Add import
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 31 May 2010 10:19:12 +0000 (10:19 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 31 May 2010 10:19:12 +0000 (10:19 +0000)
dph-base/Data/Array/Parallel/Base/DTrace.hs

index 3d9bcba..f21eeb4 100644 (file)
@@ -17,6 +17,8 @@ import Foreign.C.String
 import GHC.ST ( ST )
 import GHC.IOBase ( unsafeIOToST )
 
+import Debug.Trace ( trace )
+
 traceLoopST :: String -> ST s a -> ST s a
 {-# INLINE traceLoopST #-}
 traceLoopST s p = do