packages/deriver/tests/Unit/Deriver/Evaluator/Execution/Trace/DerivationKindTest.php

1<?php
2
3declare (strict_types=1);
4
5namespace Tests\Unit\Deriver\Evaluator\Execution\Trace;
6
7use Deriver\Deriver\Contributions;
8use Deriver\Deriver\DeriverConfig;
9use Deriver\Deriver\Evaluator\Call\Evaluators;
10use Deriver\Deriver\Evaluator\Call\Registrations;
11use Deriver\Deriver\Evaluator\EvaluatorConfig;
12use Deriver\Deriver\Evaluator\Evidence\Frontier;
13use Deriver\Deriver\Evaluator\Execution\EvaluatorConfig as ExecutionEvaluatorConfig;
14use Deriver\Deriver\Evaluator\Execution\Trace\DerivationKind as Subject;
15use Deriver\Deriver\Evaluator\Request\ReturnQuery;
16use Deriver\Deriver\Evaluator\TargetProfile;
17use Deriver\Deriver\Evaluator\Term;
18use Deriver\Deriver\Execution\QueryExecution;
19use Deriver\Deriver\Lowerer\Declaration\Index;
20use Deriver\Deriver\MicroEvaluatorConversion;
21use Deriver\Deriver\Parser\Node\File;
22use Deriver\Deriver\Parser\Parser;
23use Deriver\Deriver\Parser\ParserConfig;
24use Deriver\Deriver\Providers\ProviderExpansion;
25use Deriver\Deriver\Resolver\Resolver;
26use Deriver\Deriver\SnapshotIdentity;
27use Deriver\Deriver\Sources\Path;
28use Deriver\Deriver\Sources\Source;
29use Deriver\Deriver\Sources\Sources;
30use PHPUnit\Framework\Attributes\CoversNothing;
31use PHPUnit\Framework\TestCase;
32
33#[CoversNothing]
34final class DerivationKindTest extends TestCase
35{
36    public function testExplanationsDistinguishValueDependenciesFromWrites(): void
37    {
38        $source = '<?php function target(){$x=1;$x=2;return $x;}';
39        $symbol = 'target';
40        $input = new Sources([new Source('fixture.php', $source)]);
41        $configuration = new DeriverConfig();
42        $contributions = new Contributions();
43        $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
44        $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
45        $contributions1 = $providers->contributions;
46        $evaluators = new Evaluators(new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision), new Registrations($contributions1->evaluators, $contributions1->providers, $contributions1->domains, $contributions1->intrinsics, $contributions1->stateSlots), $configuration->standardEvaluators);
47        $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
48        $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
49        $snapshotId = $identity->id;
50        $input1 = $providers->input;
51        $parser = new Parser(new ParserConfig($target->version));
52        $trees = array_map(static fn (Source $source1): File => (new Resolver())->resolve($parser->parse(new Source(Path::normalize($source1->path), $source1->contents, $source1->declarationsOnly))), iterator_to_array($input1, false));
53        $program = new Index($snapshotId, $trees);
54        $result = (new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics()))))->derive(new ReturnQuery($symbol));
55        $kinds = array_column($result->evidence, 'kind');
56        self::assertContains(Subject::Data, $kinds);
57        self::assertContains(Subject::Effect, $kinds);
58        self::assertSame(2, $result->normalOutcomes[0]->values['return']->native());
59    }
60}
61