Commit 384a9840 authored by Vaibhav Sagar's avatar Vaibhav Sagar

Update src/tests/IHaskell/Test/Eval.hs

parent 4446931f
......@@ -159,6 +159,11 @@ testEval =
"putStrLn \"Привет!\"" `becomes` ["Привет!"]
it "evaluates directives" $ do
#if MIN_VERSION_ghc(8,2,0)
-- It's `p` instead of `t` for some reason
":typ 3" `becomes` ["3 :: forall p. Num p => p"]
#else
":typ 3" `becomes` ["3 :: forall t. Num t => t"]
#endif
":k Maybe" `becomes` ["Maybe :: * -> *"]
":in String" `pages` ["type String = [Char] \t-- Defined in \8216GHC.Base\8217"]
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment