shithub: MicroHs

Info  •  Files  •  Log  •  Branches

Export the right values.

--- a/lib/Control/Exception/Internal.hs

+++ b/lib/Control/Exception/Internal.hs

@@ -4,8 +4,8 @@

   throw, catch,

   Exception(..),

   SomeException(..),

-  PatternMatchFail, NoMethodError, RecSelError, RecConError,

-  patternMatchFail, NoMethodError, RecSelError, RecConError,

+  PatternMatchFail, NoMethodError, RecSelError, RecConError(..),

+  patternMatchFail, noMethodError, recSelError, recConError,

   ) where

 import Prelude()

 import Primitives(IO)

-- 

⑨