3 ! Variable names containing $ signs
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 '\\$'" }