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