I wrote:
OK for trunk?
Following a remark by Steve, here is an additional test case which checks if abort actually works. I'll add that to the patch when it is committed. Regards Thomas
! { dg-do run } ! { dg-shouldfail "Program aborted." } program main call abort end program main