blob: f658fa673e86a59804ed818c99cad184ecb8435c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
! RUN: %flang_fc1 -fdebug-dump-parsing-log %s 2>&1 | FileCheck %s
!-----------------
! EXPECTED OUTPUT
!-----------------
! Below are just few lines extracted from the dump. The actual output is much _much_ bigger.
! CHECK: {{.*}}/debug-parsing-log.f90:31:1: IMPLICIT statement
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
! CHECK-NEXT: fail 3
! CHECK-NEXT: {{.*}}/debug-parsing-log.f90:31:1: error: expected 'IMPLICIT NONE'
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
! CHECK-NEXT: {{.*}}/debug-parsing-log.f90:31:1: in the context: IMPLICIT statement
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
! CHECK-NEXT: {{.*}}/debug-parsing-log.f90:31:1: in the context: implicit part
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
! CHECK-NEXT: {{.*}}/debug-parsing-log.f90:31:1: in the context: specification part
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
! CHECK-NEXT: {{.*}}/debug-parsing-log.f90:31:1: in the context: main program
! CHECK-NEXT: END PROGRAM
! CHECK-NEXT: ^
!-----------------
! TEST INPUT
!-----------------
END PROGRAM
|