diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2013-09-15 10:58:00 +0200 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2013-09-17 09:47:55 +0200 |
| commit | 43ece172e7045d5ba633be6193f3e908eaa81f00 (patch) | |
| tree | f1e25c06b710a5087173daf5eb01b94ab8517917 /libraries/base/Data/Maybe.hs | |
| parent | 907cd8c36b6c249dcb8af19f05303e34eb4e8de4 (diff) | |
| download | haskell-43ece172e7045d5ba633be6193f3e908eaa81f00.tar.gz | |
Remove Hugs98 specific code
For rationale. see
http://permalink.gmane.org/gmane.comp.lang.haskell.ghc.devel/2349
Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>
Diffstat (limited to 'libraries/base/Data/Maybe.hs')
| -rw-r--r-- | libraries/base/Data/Maybe.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libraries/base/Data/Maybe.hs b/libraries/base/Data/Maybe.hs index a71c2d71b6..05e6a87cb9 100644 --- a/libraries/base/Data/Maybe.hs +++ b/libraries/base/Data/Maybe.hs @@ -35,7 +35,6 @@ module Data.Maybe import GHC.Base #endif -#ifndef __HUGS__ -- --------------------------------------------------------------------------- -- The Maybe type, and instances @@ -76,7 +75,6 @@ instance Monad Maybe where maybe :: b -> (a -> b) -> Maybe a -> b maybe n _ Nothing = n maybe _ f (Just x) = f x -#endif /* __HUGS__ */ -- | The 'isJust' function returns 'True' iff its argument is of the -- form @Just _@. |