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

Reply via email to