mirrors/IHaskell
1
0
Fork 0
mirror of https://github.com/IHaskell/IHaskell.git synced 2025-04-19 12:56:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Vaibhav Sagar 2017-10-15 16:07:33 +08:00
parent 4446931f46
commit 384a984049
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/tests/IHaskell/Test/Eval.hs
View File

@ -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"]