[project @ 2002-08-31 08:37:56 by simonpj]

Remove GHC.Base.assert until I can figure out what happened

diff --git a/GHC/Base.lhs b/GHC/Base.lhs
index e3bc346..7ee7d7d 100644 (file)
--- a/GHC/Base.lhs
+++ b/GHC/Base.lhs
@@ -595,10 +595,14 @@ id x                      =  x
 lazy :: a -> a
 lazy x = x
 
+--     SLPJ: this was transferred from the TH branch
+--     and I've forgotten what it was for... so I'll
+--     comment it back out for now.  It conflicts with
+--     'assert' in GHC.Prim
 -- Assertion function. This simply ignores its boolean argument.
 -- The compiler may rewrite it to (assertError line)
-assert :: Bool -> a -> a
-assert pred r = r
+-- assert :: Bool -> a -> a
+-- assert pred r = r
  
 -- constant function
 const                  :: a -> b -> a