fay-0.24.2.0: tests/patternMatchingTuples.hs

module PatternMatchingTuples where

main :: Fay ()
main = putStrLn doTest

doTest :: String
doTest = case ("x","") of
    (x : xs, c) -> "OK."