* tree-loop-distribution.c (struct partition): New field recording
[official-gcc.git] / gcc / testsuite / gfortran.dg / interface_operator_1.f90
blob97d260a2b987f0fec9a32fafeecfa55ebeca5890
1 ! { dg-do compile }
2 ! PR fortran/66106
4 ! Original code from Gerhard Steinmetz
5 ! <gerhard dot steinmetz dot fortran at t-online dot de>
6 program p
7 interface operator ( .gt. )
8 end interface operator ! { dg-error "END INTERFACE OPERATOR" }
9 end program p ! { dg-error "END INTERFACE" }
10 ! { dg-excess-errors "Unexpected end of file" }