1! { dg-do compile } 2! 3! Tests a write-after-free memory error fix in gfc_undo_symbols 4 5program test_nml 6 7 namelist /foo/ bar, baz 8 namelist /foo/ wrong, , ! { dg-error "Syntax error in NAMELIST" } 9 10end program test_nml 11