Add string pats

This commit is contained in:
Chris Done 2019-11-25 13:15:52 +00:00
parent c23b043068
commit 8c3eb90c3d

3
examples/string-pats.hs Normal file
View File

@ -0,0 +1,3 @@
main = case "foo" of
"bar" -> 0
"foo" -> 1