diff options
Diffstat (limited to 'devel/hs-mueval/files/patch-Mueval__Interpreter.hs')
-rw-r--r-- | devel/hs-mueval/files/patch-Mueval__Interpreter.hs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/devel/hs-mueval/files/patch-Mueval__Interpreter.hs b/devel/hs-mueval/files/patch-Mueval__Interpreter.hs new file mode 100644 index 000000000000..45f0a82a44a9 --- /dev/null +++ b/devel/hs-mueval/files/patch-Mueval__Interpreter.hs @@ -0,0 +1,11 @@ +--- ./Mueval/Interpreter.hs.orig 2011-01-11 21:24:11.000000000 +0100 ++++ ./Mueval/Interpreter.hs 2011-03-13 14:28:39.132489232 +0100 +@@ -120,7 +120,7 @@ + exceptionMsg = "*Exception: " + + -- | Renders the input String including its exceptions using @exceptionMsg@ +-render :: (Control.Monad.Trans.MonadIO m) ++render :: (Functor m, Control.Monad.Trans.MonadIO m) + => Int -- ^ max number of characters to include + -> String -- ^ input + -> m (String, Bool) -- ^ ( output, @True@ if we found an exception ) |