Add missing files.

augustss · Feb 4, 2024 · 12c2177 · 12c2177
1 parent c9fd045
commit 12c2177
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 0 deletions.
diff --git a/tests/BindPat.hs b/tests/BindPat.hs
@@ -0,0 +1,12 @@
+module BindPat(main) where
+import Prelude
+
+foo :: [Int] -> [Int]
+foo xs = do
+  1 <- xs
+  pure 2
+
+main :: IO ()
+main = do
+  print $ foo [1,1]
+  print $ foo [2]
diff --git a/tests/BindPat.ref b/tests/BindPat.ref
@@ -0,0 +1,2 @@
+[2,2]
+[]