OSDN Git Service

2010-04-06 Tobias Burnus <burnus@net-b.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / dollar_sym_1.f90
1 ! { dg-do compile }
2 ! PR fortran/34997
3 ! Variable names containing $ signs
4
5       REAL*4 PLT$C_HOUSTPIX   ! { dg-error "Invalid character '\\$'" }
6       INTEGER PLT$C_COMMAND   ! { dg-error "Invalid character '\\$'" }
7       PARAMETER (PLT$B_OPC=0) ! { dg-error "Invalid character '\\$'" }
8       common /abc$def/ PLT$C_HOUSTPIX, PLT$C_COMMAND ! { dg-error "Invalid character '\\$'" }
9       end