aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/testsuite/gfortran.dg/dollar_sym_3.f
blob: 7cf2047eda0f1a5637b8aba0e833f81154bb9f7c (plain)
1
2
3
4
5
6
7
8
9
10
! { dg-do compile }
!
! PR fortran/57895
!
! Contributed by Vittorio Zecca
!
c Segmentation fault in gfc_restore_last_undo_checkpoint
      COMMON RADE3155V62$JUTMU9L9E(3,3,3), LADE314JUTMP9         ! { dg-error "Invalid character '\\$' at .1.. Use -fdollar-ok to allow it as an extension" }
     +LHEDDJNTMP9L(3,3,3)                                                       
      end