Give deepSeq a fixity
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 29 Mar 2010 04:08:23 +0000 (04:08 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 29 Mar 2010 04:08:23 +0000 (04:08 +0000)
examples/regularArrays/Array.hs

index 95ad91f..fac6cdb 100644 (file)
@@ -126,6 +126,7 @@ class (Show sh, Eq sh) => Shape sh where
   next:: sh -> sh -> Maybe sh
   -- ^shape of an array of size zero of the particular dimensionality    
 
+  infixr 0 `deepSeq`
   deepSeq :: sh -> a -> a
   
 instance Shape () where