fay-0.19: tests/patternMatchFail.hs

module PatternMatchFail where

main :: Fay ()
main = putStrLn ((\a 'a' -> "OK.") 0 'b')