shithub: MicroHs

Info  •  Files  •  Log  •  Branches

Update comments

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

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

@@ -28,6 +28,9 @@

 instance Show SomeException where

   showsPrec p (SomeException e) = showsPrec p e

+-- NOTE: The runtime system knows about this instance.

+-- It uses displayException to show an uncaught exception.

+-- Any changes here must be reflected in eval.c

 instance Exception SomeException where

   toException se = se

   fromException = Just

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

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

@@ -41,7 +41,7 @@

 -- NOTE: The runtime system knows about this class.

 -- It uses displayException to show an uncaught exception.

--- Any changes here must be refleced in eval.c

+-- Any changes here must be reflected in eval.c

 class (Typeable e, Show e) => Exception e where

     toException      :: e -> SomeException

     fromException    :: SomeException -> Maybe e

-- 

⑨