mirror of
https://github.com/intel/llvm.git
synced 2026-01-22 23:49:22 +08: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
|