Skip to content

Commit ab3d301

Browse files
committed
shorten test case
1 parent 564ff8f commit ab3d301

File tree

1 file changed

+1
-11
lines changed

1 file changed

+1
-11
lines changed

flang/test/Semantics/cuf21.cuf

Lines changed: 1 addition & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -4,9 +4,7 @@ module mlocModule
44
interface maxlocUpdate
55
module procedure :: &
66
maxlocUpdateR_32F, &
7-
maxlocUpdateR_64F, &
8-
maxlocUpdateR_32I, &
9-
maxlocUpdateR_64I
7+
maxlocUpdateR_64F
108
end interface maxlocUpdate
119
contains
1210

@@ -25,14 +23,6 @@ contains
2523
attributes(device) subroutine maxlocUpdateR_64F(mval)
2624
real(8) :: mval
2725
end subroutine maxlocUpdateR_64F
28-
29-
attributes(device) subroutine maxlocUpdateR_32I(mval)
30-
integer(4) :: mval
31-
end subroutine maxlocUpdateR_32I
32-
33-
attributes(device) subroutine maxlocUpdateR_64I(mval)
34-
integer(8) :: mval
35-
end subroutine maxlocUpdateR_64I
3626
end module
3727

3828
! CHECK-LABEL: func.func @_QMmlocmodulePmaxlocpartialmaskr_32f1d()

0 commit comments

Comments
 (0)