avoid Foreign.unsafePerformIO
authorRoss Paterson <ross@soi.city.ac.uk>
Thu, 9 Sep 2010 12:53:57 +0000 (12:53 +0000)
committerRoss Paterson <ross@soi.city.ac.uk>
Thu, 9 Sep 2010 12:53:57 +0000 (12:53 +0000)
System/Time.hsc

index ea6c4da..70ec750 100644 (file)
@@ -125,7 +125,8 @@ import Prelude
 
 import Data.Ix
 import System.Locale
-import Foreign
+import Foreign hiding (unsafePerformIO)
+import System.IO.Unsafe (unsafePerformIO)
 
 #ifdef __HUGS__
 import Hugs.Time ( getClockTimePrim, toCalTimePrim, toClockTimePrim )