Block SIGINT while running gfInteract, as suggested by Peter.

This commit is contained in:
bringert
2006-06-15 01:41:18 +00:00
parent 3efba2f5cc
commit afac97b821
4 changed files with 16 additions and 4 deletions

View File

@@ -14,14 +14,14 @@
-- Import the right singal handling module.
-----------------------------------------------------------------------------
module GF.System.Signal (runInterruptibly) where
module GF.System.Signal (runInterruptibly,blockInterrupt) where
#ifdef USE_INTERRUPT
import GF.System.UseSignal (runInterruptibly)
import GF.System.UseSignal (runInterruptibly,blockInterrupt)
#else
import GF.System.NoSignal (runInterruptibly)
import GF.System.NoSignal (runInterruptibly,blockInterrupt)
#endif