| c { dg-do compile } | |
| CCC Abort fixed by: | |
| CCC1998-04-21 Jim Wilson <wilson@cygnus.com> | |
| CCC | |
| CCC * stmt.c (check_seenlabel): When search for line number note for | |
| CCC warning, handle case where there is no such note. | |
| logical l(10) | |
| integer i(10) | |
| goto (10,20),l ! { dg-error "Selection expression in computed GOTO" "" } | |
| goto (10,20),i ! { dg-error "Selection expression in computed GOTO" "" } | |
| 10 stop | |
| 20 end |