on master help sign in
Fix bug in binop canonicalizer
e09f369Evan Czaplicki
src/Canonicalize/Binops.hs+1−1
@@ -86,7 +86,7 @@ flattenHelp makeBinop rootOp@(Op _ rootAssoc rootPrec _) middle last =
86 Done (makeBinop newLast)
86 Done (makeBinop newLast)
87
87
88 More newMiddle newLast ->
88 More newMiddle newLast ->
89− flattenHelp makeBinop op newMiddle newLast
89+ flattenHelp makeBinop rootOp newMiddle newLast
90
90
91 Error a b ->
91 Error a b ->
92 Error a b
92 Error a b