http://gcc.gnu.org/bugzilla/show_bug.cgi?id=49690

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2011.07.09 15:33:06
                 CC|                            |kargl at gcc dot gnu.org
      Known to work|                            |4.3.6, 4.4.7
     Ever Confirmed|0                           |1
      Known to fail|                            |4.7.0

--- Comment #1 from kargl at gcc dot gnu.org 2011-07-09 15:33:06 UTC ---
Reduced testcase.

subroutine ctrlc_ast
   common /xinterrupt/ interrupted
   logical interrupted
   interrupted = .true.
end subroutine ctrlc_ast  

subroutine set_ctrl_c(ctrlc_ast)
   external ctrlc_ast
   integer old_handle
   common /xinterrupt/ interrupted
   logical interrupted
   old_handler = signal(2, ctrlc_ast)    
end subroutine set_ctrl_c

Reply via email to