IPFail.hs 111 Bytes
Newer Older
simonpj's avatar
simonpj committed
1
2
3
4
5
6
{-# LANGUAGE ImplicitParams #-}

module IPFail where

f0 :: (?x :: Int) => () -> Bool
f0 () = let ?x = 5 in ?x