Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/master
/
.
/
test
/
Lower
/
pause-statement.f90
blob: e4cba98dc8a79327325541a38e504c456624f445 [
file
] [
log
] [
blame
]
!
RUN
:
bbc
%
s
-
emit
-
fir
--
canonicalize
-
o
-
|
FileCheck
%
s
!
CHECK
-
LABEL pause_test
subroutine pause_test
()
!
CHECK
:
fir
.
call
@_Fortran
{{.*}}
PauseStatement
()
!
CHECK
-
NEXT
:
return
pause
end
subroutine