tenseleyflow/bencch / 3fed49c

Browse files

Expand module graph suites

Authored by espadonne
SHA
3fed49c6ffb1e6956e2b9be14c8020792c2ffcaf
Parents
fd45526
Tree
b9d179c

3 changed files

StatusFile+-
A suites/modules/backend_graphs.afs 11 0
A suites/modules/lowering_graphs.afs 21 0
M suites/modules/runtime_graphs.afs 12 1
suites/modules/backend_graphs.afsadded
@@ -0,0 +1,11 @@
1
+suite "modules/backend-graphs"
2
+
3
+case "module_procedure_backend"
4
+entry "../../fixtures/modules/module_procedure/main.f90"
5
+file "../../fixtures/modules/module_procedure/ops.f90"
6
+file "../../fixtures/modules/module_procedure/main.f90"
7
+armfortas => asm, obj
8
+expect asm contains ".globl _add_one"
9
+expect obj not-contains "(undefined) external _add_one"
10
+xfail "Module procedures are called but not emitted into backend artifacts."
11
+end
suites/modules/lowering_graphs.afsadded
@@ -0,0 +1,21 @@
1
+suite "modules/lowering-graphs"
2
+
3
+case "module_chain_ir_values"
4
+entry "../../fixtures/modules/module_chain/main.f90"
5
+file "../../fixtures/modules/module_chain/math_seed.f90"
6
+file "../../fixtures/modules/module_chain/math_values.f90"
7
+file "../../fixtures/modules/module_chain/main.f90"
8
+armfortas => ir
9
+expect ir not-contains "global @math_seed::seed: i32 = zeroinit"
10
+expect ir not-contains "global @math_values::doubled: i32 = zeroinit"
11
+xfail "Imported module values currently lower as zeroinit in multi-file graphs."
12
+end
13
+
14
+case "module_procedure_ir"
15
+entry "../../fixtures/modules/module_procedure/main.f90"
16
+file "../../fixtures/modules/module_procedure/ops.f90"
17
+file "../../fixtures/modules/module_procedure/main.f90"
18
+armfortas => ir
19
+expect ir contains "func @add_one"
20
+xfail "Module procedures are called but not lowered into IR functions."
21
+end
suites/modules/runtime_graphs.afsmodified
@@ -35,7 +35,18 @@ file "../../fixtures/modules/submodule_future/parent_mod.f90"
3535
 file "../../fixtures/modules/submodule_future/child_impl.f90"
3636
 file "../../fixtures/modules/submodule_future/main.f90"
3737
 armfortas => run
38
-future "Submodule resolution is not ready yet."
38
+future "Submodule frontend parses, but runtime lowering/codegen is not ready yet."
3939
 expect run.stdout check-comments
4040
 expect run.exit_code equals 0
4141
 end
42
+
43
+case "module_procedure_runtime"
44
+entry "../../fixtures/modules/module_procedure/main.f90"
45
+file "../../fixtures/modules/module_procedure/ops.f90"
46
+file "../../fixtures/modules/module_procedure/main.f90"
47
+opts => O0, O1, O2
48
+armfortas => run
49
+expect run.stdout check-comments
50
+expect run.exit_code equals 0
51
+xfail "Module procedures are called, but the lowered graph does not emit the callee body."
52
+end