Skip to content
Browse files

Fix a syntax error

  • Loading branch information...
1 parent dc295a4 commit 765d4c88850dee2db073e90a594069e091f96bbb @nelhage committed Jul 26, 2008
Showing with 1 addition and 1 deletion.
  1. +1 −1 FLNV/AST.hs
View
2 FLNV/AST.hs
@@ -102,4 +102,4 @@ flatten Nil = return []
flatten (Cons a b) = do head <- desugar a
tail <- flatten b
return $ head:tail
-flatten er = throwError $ SyntaxError "Invalid sequence" err
+flatten err = throwError $ SyntaxError "Invalid sequence" err

0 comments on commit 765d4c8

Please sign in to comment.
Something went wrong with that request. Please try again.