1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
package org.shedlang.compiler.backends.llvm;
import org.shedlang.compiler.backends.llvm.codegen.PatioToLlvm;
import org.shedlang.compiler.backends.llvm.codegen.PatioToLlvmGlobalContext;
import org.shedlang.compiler.backends.llvm.ir.ast.LlvmBasicBlock;
import org.shedlang.compiler.backends.llvm.ir.ast.LlvmFunctionDefinition;
import org.shedlang.compiler.backends.llvm.ir.ast.instructions.LlvmCall;
import org.shedlang.compiler.backends.llvm.ir.ast.instructions.LlvmReturn;
import org.shedlang.compiler.backends.llvm.ir.ast.operands.LlvmOperandInt;
import org.shedlang.compiler.backends.llvm.ir.ast.operands.LlvmVariableGlobal;
import org.shedlang.compiler.backends.llvm.ir.ast.types.LlvmTypes;
import org.shedlang.compiler.backends.paths.PartialTargetPath;
import org.shedlang.compiler.backends.targets.NativeTarget;
import org.shedlang.compiler.patio.PatioCompilationUnit;
import org.shedlang.compiler.patio.PatioExampleTests;
import org.shedlang.compiler.runtime.ShedRuntime;
import org.shedlang.compiler.testing.ExecutionResult;
import org.shedlang.compiler.testing.TestProcessRunner;
import java.io.IOException;
import java.nio.file.Files;
import java.nio.file.Path;
import java.util.List;
import java.util.Optional;
public abstract class PatioToLlvmTests extends PatioExampleTests {
@Override
protected ExecutionResult executeCompilationUnit(PatioCompilationUnit patio) throws IOException, InterruptedException {
var llvmModuleResult = PatioToLlvm.generateCompilationUnit(
patio,
PatioToLlvmGlobalContext.empty(this.target())
);
var llvmModule = llvmModuleResult.value();
llvmModule = llvmModule.addTopLevelEntity(new LlvmFunctionDefinition(
"main",
LlvmTypes.INT_32,
List.of(),
List.of(
new LlvmBasicBlock(
Optional.empty(),
List.of(
new LlvmCall(
Optional.empty(),
LlvmTypes.VOID,
new LlvmVariableGlobal(FUNCTION_NAME),
List.of()
)
),
new LlvmReturn(LlvmTypes.INT_32, new LlvmOperandInt(0))
)
)
));
Files.createDirectories(Path.of("tests-tmp"));
var workingDirectory = Files.createTempDirectory(Path.of("tests-tmp"), "PatioToLlvmTests");
var objectFilePath = LlvmCompiler.compileLlvmModule(
llvmModule,
new PartialTargetPath(workingDirectory.resolve("main"))
);
var executablePath = workingDirectory.resolve("main");
var runtime = ShedRuntime.defaultRuntime(target().targetName());
LlvmBackend.forTarget(this.target()).link(
List.of(
objectFilePath,
runtime.dir().resolve("libpatio_test.a")
),
executablePath,
runtime
);
return TestProcessRunner.runCaptureOutput(List.of(executablePath.toString()));
}
protected abstract NativeTarget target();
}
|