blob: 227e0400335dc22f887dd8d83a4467ebea244610 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
-- trac #2033: This used to fail when the renamer didn't check for a view
-- /pattern/ being used in an /expression/ context
module RnFail051 where
main :: IO ()
main = wrapper (_ -> putStrLn "_")
wrapper :: (String -> IO ()) -> IO ()
wrapper f = f ""
|