Skip to content

Commit 2985d1c

Browse files
clementvalclementval
committed
[flang][NFC] Fix lowering tests indent
Remove 2 spaces indent that was introduced by mistake when upstreaming these files.
1 parent 71b162c commit 2985d1c

23 files changed

+4945
-4949
lines changed

‎flang/test/Lower/allocatable-globals.f90

Lines changed: 59 additions & 59 deletions
Original file line numberDiff line numberDiff line change
@@ -10,63 +10,63 @@
1010
! CHECK: fir.has_value %[[modcInitBox]] : !fir.box<!fir.heap<!fir.array<?x!fir.char<1,10>>>>
1111

1212
module mod_allocatables
13-
character(10), allocatable :: c(:)
14-
end module
13+
character(10), allocatable :: c(:)
14+
end module
1515

16-
! CHECK-LABEL: func @_QPtest_mod_allocatables()
17-
subroutine test_mod_allocatables()
18-
use mod_allocatables, only: c
19-
! CHECK: fir.address_of(@_QMmod_allocatablesEc) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x!fir.char<1,10>>>>>
20-
call bar(c(1))
21-
end subroutine
22-
23-
24-
! CHECK-LABEL: func @_QPtest_globals()
25-
subroutine test_globals()
26-
integer, allocatable :: gx, gy(:, :)
27-
save :: gx, gy
28-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgx) : !fir.ref<!fir.box<!fir.heap<i32>>>
29-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgy) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?xi32>>>>
30-
character(:), allocatable :: gc1, gc2(:, :)
31-
character(10), allocatable :: gc3, gc4(:, :)
32-
save :: gc1, gc2, gc3, gc4
33-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc1) : !fir.ref<!fir.box<!fir.heap<!fir.char<1,?>>>>
34-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc2) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>>
35-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc3) : !fir.ref<!fir.box<!fir.heap<!fir.char<1,10>>>>
36-
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc4) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>>
37-
allocate(gx, gy(20, 30), gc3, gc4(40, 50))
38-
allocate(character(15):: gc1, gc2(60, 70))
39-
end subroutine
40-
41-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc1 : !fir.box<!fir.heap<!fir.char<1,?>>>
42-
! CHECK-DAG: %[[gc1NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.char<1,?>>
43-
! CHECK: %[[gc1InitBox:.*]] = fir.embox %[[gc1NullAddr]] typeparams %c0{{.*}} : (!fir.heap<!fir.char<1,?>>, index) -> !fir.box<!fir.heap<!fir.char<1,?>>>
44-
! CHECK: fir.has_value %[[gc1InitBox]] : !fir.box<!fir.heap<!fir.char<1,?>>>
45-
46-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc2 : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
47-
! CHECK-DAG: %[[gc2NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?x!fir.char<1,?>>>
48-
! CHECK-DAG: %[[gc2NullShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
49-
! CHECK: %[[gc2InitBox:.*]] = fir.embox %[[gc2NullAddr]](%[[gc2NullShape]]) typeparams %c0{{.*}} : (!fir.heap<!fir.array<?x?x!fir.char<1,?>>>, !fir.shape<2>, index) -> !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
50-
! CHECK: fir.has_value %[[gc2InitBox]] : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
51-
52-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc3 : !fir.box<!fir.heap<!fir.char<1,10>>>
53-
! CHECK-DAG: %[[gc3NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.char<1,10>>
54-
! CHECK: %[[gc3InitBox:.*]] = fir.embox %[[gc3NullAddr]] : (!fir.heap<!fir.char<1,10>>) -> !fir.box<!fir.heap<!fir.char<1,10>>>
55-
! CHECK: fir.has_value %[[gc3InitBox]] : !fir.box<!fir.heap<!fir.char<1,10>>>
56-
57-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc4 : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
58-
! CHECK-DAG: %[[gc4NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?x!fir.char<1,10>>>
59-
! CHECK-DAG: %[[gc4NullShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
60-
! CHECK: %[[gc4InitBox:.*]] = fir.embox %[[gc4NullAddr]](%[[gc4NullShape]]) : (!fir.heap<!fir.array<?x?x!fir.char<1,10>>>, !fir.shape<2>) -> !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
61-
! CHECK: fir.has_value %[[gc4InitBox]] : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
62-
63-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgx : !fir.box<!fir.heap<i32>>
64-
! CHECK: %[[gxNullAddr:.*]] = fir.zero_bits !fir.heap<i32>
65-
! CHECK: %[[gxInitBox:.*]] = fir.embox %0 : (!fir.heap<i32>) -> !fir.box<!fir.heap<i32>>
66-
! CHECK: fir.has_value %[[gxInitBox]] : !fir.box<!fir.heap<i32>>
67-
68-
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgy : !fir.box<!fir.heap<!fir.array<?x?xi32>>> {
69-
! CHECK-DAG: %[[gyNullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?xi32>>
70-
! CHECK-DAG: %[[gyShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
71-
! CHECK: %[[gyInitBox:.*]] = fir.embox %[[gyNullAddr]](%[[gyShape]]) : (!fir.heap<!fir.array<?x?xi32>>, !fir.shape<2>) -> !fir.box<!fir.heap<!fir.array<?x?xi32>>>
72-
! CHECK: fir.has_value %[[gyInitBox]] : !fir.box<!fir.heap<!fir.array<?x?xi32>>>
16+
! CHECK-LABEL: func @_QPtest_mod_allocatables()
17+
subroutine test_mod_allocatables()
18+
use mod_allocatables, only: c
19+
! CHECK: fir.address_of(@_QMmod_allocatablesEc) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x!fir.char<1,10>>>>>
20+
call bar(c(1))
21+
end subroutine
22+
23+
24+
! CHECK-LABEL: func @_QPtest_globals()
25+
subroutine test_globals()
26+
integer, allocatable :: gx, gy(:, :)
27+
save :: gx, gy
28+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgx) : !fir.ref<!fir.box<!fir.heap<i32>>>
29+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgy) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?xi32>>>>
30+
character(:), allocatable :: gc1, gc2(:, :)
31+
character(10), allocatable :: gc3, gc4(:, :)
32+
save :: gc1, gc2, gc3, gc4
33+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc1) : !fir.ref<!fir.box<!fir.heap<!fir.char<1,?>>>>
34+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc2) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>>
35+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc3) : !fir.ref<!fir.box<!fir.heap<!fir.char<1,10>>>>
36+
! CHECK-DAG: fir.address_of(@_QFtest_globalsEgc4) : !fir.ref<!fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>>
37+
allocate(gx, gy(20, 30), gc3, gc4(40, 50))
38+
allocate(character(15):: gc1, gc2(60, 70))
39+
end subroutine
40+
41+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc1 : !fir.box<!fir.heap<!fir.char<1,?>>>
42+
! CHECK-DAG: %[[gc1NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.char<1,?>>
43+
! CHECK: %[[gc1InitBox:.*]] = fir.embox %[[gc1NullAddr]] typeparams %c0{{.*}} : (!fir.heap<!fir.char<1,?>>, index) -> !fir.box<!fir.heap<!fir.char<1,?>>>
44+
! CHECK: fir.has_value %[[gc1InitBox]] : !fir.box<!fir.heap<!fir.char<1,?>>>
45+
46+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc2 : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
47+
! CHECK-DAG: %[[gc2NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?x!fir.char<1,?>>>
48+
! CHECK-DAG: %[[gc2NullShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
49+
! CHECK: %[[gc2InitBox:.*]] = fir.embox %[[gc2NullAddr]](%[[gc2NullShape]]) typeparams %c0{{.*}} : (!fir.heap<!fir.array<?x?x!fir.char<1,?>>>, !fir.shape<2>, index) -> !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
50+
! CHECK: fir.has_value %[[gc2InitBox]] : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,?>>>>
51+
52+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc3 : !fir.box<!fir.heap<!fir.char<1,10>>>
53+
! CHECK-DAG: %[[gc3NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.char<1,10>>
54+
! CHECK: %[[gc3InitBox:.*]] = fir.embox %[[gc3NullAddr]] : (!fir.heap<!fir.char<1,10>>) -> !fir.box<!fir.heap<!fir.char<1,10>>>
55+
! CHECK: fir.has_value %[[gc3InitBox]] : !fir.box<!fir.heap<!fir.char<1,10>>>
56+
57+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgc4 : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
58+
! CHECK-DAG: %[[gc4NullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?x!fir.char<1,10>>>
59+
! CHECK-DAG: %[[gc4NullShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
60+
! CHECK: %[[gc4InitBox:.*]] = fir.embox %[[gc4NullAddr]](%[[gc4NullShape]]) : (!fir.heap<!fir.array<?x?x!fir.char<1,10>>>, !fir.shape<2>) -> !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
61+
! CHECK: fir.has_value %[[gc4InitBox]] : !fir.box<!fir.heap<!fir.array<?x?x!fir.char<1,10>>>>
62+
63+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgx : !fir.box<!fir.heap<i32>>
64+
! CHECK: %[[gxNullAddr:.*]] = fir.zero_bits !fir.heap<i32>
65+
! CHECK: %[[gxInitBox:.*]] = fir.embox %0 : (!fir.heap<i32>) -> !fir.box<!fir.heap<i32>>
66+
! CHECK: fir.has_value %[[gxInitBox]] : !fir.box<!fir.heap<i32>>
67+
68+
! CHECK-LABEL: fir.global internal @_QFtest_globalsEgy : !fir.box<!fir.heap<!fir.array<?x?xi32>>> {
69+
! CHECK-DAG: %[[gyNullAddr:.*]] = fir.zero_bits !fir.heap<!fir.array<?x?xi32>>
70+
! CHECK-DAG: %[[gyShape:.*]] = fir.shape %c0{{.*}}, %c0{{.*}} : (index, index) -> !fir.shape<2>
71+
! CHECK: %[[gyInitBox:.*]] = fir.embox %[[gyNullAddr]](%[[gyShape]]) : (!fir.heap<!fir.array<?x?xi32>>, !fir.shape<2>) -> !fir.box<!fir.heap<!fir.array<?x?xi32>>>
72+
! CHECK: fir.has_value %[[gyInitBox]] : !fir.box<!fir.heap<!fir.array<?x?xi32>>>

‎flang/test/Lower/alternate-return.f90

Lines changed: 45 additions & 45 deletions
Original file line numberDiff line numberDiff line change
@@ -2,48 +2,48 @@
22

33
! CHECK-LABEL: func @_QPss
44
subroutine ss(n)
5-
print*, n
6-
! CHECK: return{{$}}
7-
return
8-
! CHECK-LABEL: func @_QPee
9-
entry ee(n,*)
10-
print*, n
11-
! CHECK: return %{{.}} : index
12-
return 1
13-
end
14-
15-
! CHECK-LABEL: func @_QQmain
16-
call ss(7)
17-
call ee(2, *3)
18-
print*, 'default'
19-
3 print*, 3
20-
21-
print*, k(10,20)
22-
print*, k(15,15)
23-
print*, k(20,10)
24-
end
25-
26-
! CHECK-LABEL: func @_QPk
27-
function k(n1, n2)
28-
! CHECK-NOT: ^bb
29-
! CHECK: [[selector:%[0-9]+]] = fir.call @_QPs
30-
! CHECK-NEXT: fir.select [[selector]] : index [1, ^[[block1:bb[0-9]+]], 2, ^[[block2:bb[0-9]+]], unit, ^[[blockunit:bb[0-9]+]]
31-
call s(n1, *5, n2, *7)
32-
! CHECK: ^[[blockunit]]: // pred: ^bb0
33-
k = 0; return;
34-
! CHECK: ^[[block1]]: // pred: ^bb0
35-
5 k = -1; return;
36-
! CHECK: ^[[block2]]: // pred: ^bb0
37-
7 k = 1; return
38-
end
39-
40-
! CHECK-LABEL: func @_QPs
41-
subroutine s(n1, *, n2, *)
42-
! CHECK: [[retval:%[0-9]+]] = fir.alloca index {{{.*}}bindc_name = "s"}
43-
! CHECK-COUNT-3: fir.store {{.*}} to [[retval]] : !fir.ref<index>
44-
if (n1 < n2) return 1
45-
if (n1 > n2) return 2
46-
! CHECK: {{.*}} = fir.load [[retval]] : !fir.ref<index>
47-
! CHECK-NEXT: return {{.*}} : index
48-
return
49-
end
5+
print*, n
6+
! CHECK: return{{$}}
7+
return
8+
! CHECK-LABEL: func @_QPee
9+
entry ee(n,*)
10+
print*, n
11+
! CHECK: return %{{.}} : index
12+
return 1
13+
end
14+
15+
! CHECK-LABEL: func @_QQmain
16+
call ss(7)
17+
call ee(2, *3)
18+
print*, 'default'
19+
3 print*, 3
20+
21+
print*, k(10,20)
22+
print*, k(15,15)
23+
print*, k(20,10)
24+
end
25+
26+
! CHECK-LABEL: func @_QPk
27+
function k(n1, n2)
28+
! CHECK-NOT: ^bb
29+
! CHECK: [[selector:%[0-9]+]] = fir.call @_QPs
30+
! CHECK-NEXT: fir.select [[selector]] : index [1, ^[[block1:bb[0-9]+]], 2, ^[[block2:bb[0-9]+]], unit, ^[[blockunit:bb[0-9]+]]
31+
call s(n1, *5, n2, *7)
32+
! CHECK: ^[[blockunit]]: // pred: ^bb0
33+
k = 0; return;
34+
! CHECK: ^[[block1]]: // pred: ^bb0
35+
5 k = -1; return;
36+
! CHECK: ^[[block2]]: // pred: ^bb0
37+
7 k = 1; return
38+
end
39+
40+
! CHECK-LABEL: func @_QPs
41+
subroutine s(n1, *, n2, *)
42+
! CHECK: [[retval:%[0-9]+]] = fir.alloca index {{{.*}}bindc_name = "s"}
43+
! CHECK-COUNT-3: fir.store {{.*}} to [[retval]] : !fir.ref<index>
44+
if (n1 < n2) return 1
45+
if (n1 > n2) return 2
46+
! CHECK: {{.*}} = fir.load [[retval]] : !fir.ref<index>
47+
! CHECK-NEXT: return {{.*}} : index
48+
return
49+
end

‎flang/test/Lower/arithmetic-goto.f90

Lines changed: 33 additions & 33 deletions
Original file line numberDiff line numberDiff line change
@@ -2,36 +2,36 @@
22

33
! CHECK-LABEL: func @_QPkagi
44
function kagi(index)
5-
! CHECK: fir.select_case %{{.}} : i32 [#fir.upper, %c-1_i32, ^bb{{.}}, #fir.lower, %c1_i32, ^bb{{.}}, unit, ^bb{{.}}]
6-
if (index) 7, 8, 9
7-
kagi = 0; return
8-
7 kagi = 1; return
9-
8 kagi = 2; return
10-
9 kagi = 3; return
11-
end
12-
13-
! CHECK-LABEL: func @_QPkagf
14-
function kagf(findex)
15-
! CHECK: %[[zero:.+]] = arith.constant 0.0
16-
! CHECK: %{{.+}} = arith.cmpf olt, %{{.+}}, %[[zero]] : f32
17-
! CHECK: cond_br %
18-
! CHECK: %{{.+}} = arith.cmpf ogt, %{{.+}}, %[[zero]] : f32
19-
! CHECK: cond_br %
20-
! CHECK: br ^
21-
if (findex+findex) 7, 8, 9
22-
kagf = 0; return
23-
7 kagf = 1; return
24-
8 kagf = 2; return
25-
9 kagf = 3; return
26-
end
27-
28-
! CHECK-LABEL: func @_QQmain
29-
30-
print*, kagf(-2.0)
31-
print*, kagf(-1.0)
32-
print*, kagf(-0.0)
33-
print*, kagf( 0.0)
34-
print*, kagf(+0.0)
35-
print*, kagf(+1.0)
36-
print*, kagf(+2.0)
37-
end
5+
! CHECK: fir.select_case %{{.}} : i32 [#fir.upper, %c-1_i32, ^bb{{.}}, #fir.lower, %c1_i32, ^bb{{.}}, unit, ^bb{{.}}]
6+
if (index) 7, 8, 9
7+
kagi = 0; return
8+
7 kagi = 1; return
9+
8 kagi = 2; return
10+
9 kagi = 3; return
11+
end
12+
13+
! CHECK-LABEL: func @_QPkagf
14+
function kagf(findex)
15+
! CHECK: %[[zero:.+]] = arith.constant 0.0
16+
! CHECK: %{{.+}} = arith.cmpf olt, %{{.+}}, %[[zero]] : f32
17+
! CHECK: cond_br %
18+
! CHECK: %{{.+}} = arith.cmpf ogt, %{{.+}}, %[[zero]] : f32
19+
! CHECK: cond_br %
20+
! CHECK: br ^
21+
if (findex+findex) 7, 8, 9
22+
kagf = 0; return
23+
7 kagf = 1; return
24+
8 kagf = 2; return
25+
9 kagf = 3; return
26+
end
27+
28+
! CHECK-LABEL: func @_QQmain
29+
30+
print*, kagf(-2.0)
31+
print*, kagf(-1.0)
32+
print*, kagf(-0.0)
33+
print*, kagf( 0.0)
34+
print*, kagf(+0.0)
35+
print*, kagf(+1.0)
36+
print*, kagf(+2.0)
37+
end

0 commit comments

Comments
 (0)