mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-17 04:06:46 +00:00
9 lines
208 B
Fortran
9 lines
208 B
Fortran
! 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
|