From: Lemmih <lemmih@gmail.com>
Date: Fri, 7 Apr 2006 12:58:27 +0000 (+0000)
Subject: GHC.Base.breakpoint
X-Git-Tag: directory_2007-05-24~310
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1c7a878713f1429ed4964a8bc47249d44d23a770;p=haskell-directory.git

GHC.Base.breakpoint
---

diff --git a/GHC/Base.lhs b/GHC/Base.lhs
index 8278dbb..2cca920 100644
--- a/GHC/Base.lhs
+++ b/GHC/Base.lhs
@@ -711,7 +711,10 @@ lazy x = x
 --	defined here in Base.lhs
 assert :: Bool -> a -> a
 assert pred r = r
- 
+
+breakpoint :: a -> a
+breakpoint r = r
+
 -- | Constant function.
 const			:: a -> b -> a
 const x _		=  x