19 lines · plain
1! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s2!CHECK: #line "{{.*[/\\]}}line-directive.f90" 33subroutine s4 implicit none5 a = 1.6#line 1007!CHECK: #line 1018 b = 2.9#line "sourceFile.cobol" 20010!CHECK: #line "sourceFile.cobol" 20111 c = 3.12# 30013!CHECK: #line 30114 d = 4.15# "/dev/random" 40016!CHECK: #line "/dev/random" 40117 e = 5.18end19