Brummel
a20ab93c66
Symbol-Mangling-Schema einheitlich auf @ail_<modul>_<def> umgestellt (auch für Single-Modul-Programme), String-Globals als @.str_<modul>_<idx>. main bleibt LLVM-/C-ABI-Eintrittspunkt und ist ein Trampoline auf @ail_<entry>_main. lower_workspace emittiert eine einzige .ll für den ganzen Workspace, alphabetisch nach Modulname, Cross-Module-Calls über Import-Map aufgelöst. ail build / ail emit-ir laufen jetzt durch den Workspace-Pfad. IR-Snapshots regeneriert, neuer ws_main-Snapshot. E2E-Test workspace_build_runs_imported_fn prüft, dass das Binary die importierte Funktion korrekt aufruft. Schuld #19 (source_filename) durch einheitliches <entry>.ail-Schema geschlossen.
67 lines
1.8 KiB
LLVM
67 lines
1.8 KiB
LLVM
; AILang generated workspace; entry: list
|
|
source_filename = "list.ail"
|
|
target triple = "<NORMALIZED>"
|
|
|
|
@.str_list_fmt_int_0 = private unnamed_addr constant [6 x i8] c"%lld\0A\00", align 1
|
|
|
|
declare i32 @printf(ptr, ...)
|
|
declare i32 @puts(ptr)
|
|
declare ptr @malloc(i64)
|
|
|
|
define i64 @ail_list_sum_list(ptr %arg_xs) {
|
|
entry:
|
|
%v1 = load i64, ptr %arg_xs, align 8
|
|
switch i64 %v1, label %mdefault.2 [
|
|
i64 0, label %marm.2.0
|
|
i64 1, label %marm.2.1
|
|
]
|
|
marm.2.0:
|
|
br label %mjoin.2
|
|
marm.2.1:
|
|
%v3 = getelementptr inbounds i8, ptr %arg_xs, i64 8
|
|
%v4 = load i64, ptr %v3, align 8
|
|
%v5 = getelementptr inbounds i8, ptr %arg_xs, i64 16
|
|
%v6 = load ptr, ptr %v5, align 8
|
|
%v7 = call i64 @ail_list_sum_list(ptr %v6)
|
|
%v8 = add i64 %v4, %v7
|
|
br label %mjoin.2
|
|
mdefault.2:
|
|
unreachable
|
|
mjoin.2:
|
|
%v9 = phi i64 [ 0, %marm.2.0 ], [ %v8, %marm.2.1 ]
|
|
ret i64 %v9
|
|
}
|
|
|
|
define i8 @ail_list_main() {
|
|
entry:
|
|
%v1 = call ptr @malloc(i64 8)
|
|
store i64 0, ptr %v1, align 8
|
|
%v2 = call ptr @malloc(i64 24)
|
|
store i64 1, ptr %v2, align 8
|
|
%v3 = getelementptr inbounds i8, ptr %v2, i64 8
|
|
store i64 12, ptr %v3, align 8
|
|
%v4 = getelementptr inbounds i8, ptr %v2, i64 16
|
|
store ptr %v1, ptr %v4, align 8
|
|
%v5 = call ptr @malloc(i64 24)
|
|
store i64 1, ptr %v5, align 8
|
|
%v6 = getelementptr inbounds i8, ptr %v5, i64 8
|
|
store i64 20, ptr %v6, align 8
|
|
%v7 = getelementptr inbounds i8, ptr %v5, i64 16
|
|
store ptr %v2, ptr %v7, align 8
|
|
%v8 = call ptr @malloc(i64 24)
|
|
store i64 1, ptr %v8, align 8
|
|
%v9 = getelementptr inbounds i8, ptr %v8, i64 8
|
|
store i64 10, ptr %v9, align 8
|
|
%v10 = getelementptr inbounds i8, ptr %v8, i64 16
|
|
store ptr %v5, ptr %v10, align 8
|
|
%v11 = call i64 @ail_list_sum_list(ptr %v8)
|
|
call i32 (ptr, ...) @printf(ptr @.str_list_fmt_int_0, i64 %v11)
|
|
ret i8 0
|
|
}
|
|
|
|
|
|
define i32 @main() {
|
|
call i8 @ail_list_main()
|
|
ret i32 0
|
|
}
|