blob: 5a522ea7816df70194e6a0a548f43c2fa5bfcf94 [file] [log] [blame]
! { dg-do run }
! { dg-shouldfail "Program aborted." }
program main
call abort
end program main