fay-0.2.0.0: tests/16.hs
data Person = Person String String Int
main = print (case Person "Chris" "Done" 13 of
Person "Chris" "Done" 13 -> "Hello!")
print :: Foreign a => a -> Fay ()
print = foreignFay "console.log" FayNonedata Person = Person String String Int
main = print (case Person "Chris" "Done" 13 of
Person "Chris" "Done" 13 -> "Hello!")
print :: Foreign a => a -> Fay ()
print = foreignFay "console.log" FayNone