1! { dg-do compile }
2!
3! PR fortran/57895
4!
5! Contributed by Vittorio Zecca
6!
7c Segmentation fault in gfc_restore_last_undo_checkpoint
8      COMMON RADE3155V62$JUTMU9L9E(3,3,3), LADE314JUTMP9         ! { dg-error "Invalid character '\\$' at .1.. Use '-fdollar-ok' to allow it as an extension" }
9     +LHEDDJNTMP9L(3,3,3)
10      end
11! { dg-excess-errors "compilation terminated" }
12