Replace mentions of {-# STRICT -#} with bangs in compress2
[nofib.git] / real / compress2 / Encode.hs
index 290e2fa..c3c2931 100644 (file)
@@ -14,12 +14,12 @@ data CodeEvent =
                  Clear deriving Show{-was:Text-}
 
 data CodeState = CS
-                 Int {-# STRICT #-}
-                 Int {-# STRICT #-}
-                 Int {-# STRICT #-}
-                 Int {-# STRICT #-}
-                 Int {-# STRICT #-}
-                 Int {-# STRICT #-}
+                 !Int
+                 !Int
+                 !Int
+                 !Int
+                 !Int
+                 !Int
 
 firstEnt    = 257       :: Int
 maxBits     = 16        :: Int