Commit 21117256 authored by Clint Adams's avatar Clint Adams

Replace lost bracket.

parent 31d67b15
haskell-lambdabot-haskell-plugins (5.0.3-5) unstable; urgency=medium
* Replace lost bracket.
-- Clint Adams <clint@debian.org> Fri, 06 May 2016 13:44:37 -0400
haskell-lambdabot-haskell-plugins (5.0.3-4) unstable; urgency=medium
* Patch for newer haskell-src-exts.
......
......@@ -53,7 +53,7 @@
---- combine function binding and lambda
-optimizeD (FunBind [Match locat fname pats1 Nothing (UnGuardedRhs (Lambda _ pats2 rhs)) (BDecls [])])
- = FunBind [Match locat fname (pats1 ++ pats2) Nothing (UnGuardedRhs rhs) (BDecls [])]
+optimizeD (FunBind [Match locat fname pats1 Nothing (UnGuardedRhs (Lambda _ pats2 rhs)) Nothing)
+optimizeD (FunBind [Match locat fname pats1 Nothing (UnGuardedRhs (Lambda _ pats2 rhs)) Nothing])
+ = FunBind [Match locat fname (pats1 ++ pats2) Nothing (UnGuardedRhs rhs) Nothing]
optimizeD x = x
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment