Text · 901 bytes Raw Blame History
1 suite "differential/runtime"
2
3 case "mixed_types_refs"
4 source "../../fixtures/runtime/mixed_types.f90"
5 opts => O0, O1, O2
6 armfortas => run
7 differential => gfortran, flang-new
8 expect run.stdout check-comments
9 expect run.exit_code equals 0
10 end
11
12 case "where_construct_refs"
13 source "../../fixtures/runtime/where_construct.f90"
14 opts => O0, O1, O2
15 armfortas => run
16 differential => gfortran, flang-new
17 expect run.stdout check-comments
18 expect run.exit_code equals 0
19 end
20
21 case "derived_type_basic_refs"
22 source "../../fixtures/runtime/derived_type_basic.f90"
23 opts => O0, O1, O2
24 armfortas => run
25 differential => gfortran, flang-new
26 expect run.stdout check-comments
27 expect run.exit_code equals 0
28 end
29
30 case "string_fixed_refs"
31 source "../../fixtures/runtime/string_fixed.f90"
32 opts => O0, O1, O2
33 armfortas => run
34 differential => gfortran, flang-new
35 expect run.stdout check-comments
36 expect run.exit_code equals 0
37 end