on master help sign in
Properly generate infix ops not in Basics
1f48a27Evan Czaplicki
compiler/Generate/JavaScript.hs+1−1
@@ -322,7 +322,7 @@ binop span op e1 e2 =
322 js1 = expression e1
322 js1 = expression e1
323 js2 = expression e2
323 js2 = expression e2
324
324
325− func | isOp operator = BracketRef () (dotSep (init parts ++ ["_op"])) (string op)
325+ func | isOp operator = BracketRef () (dotSep (init parts ++ ["_op"])) (string operator)
326 | otherwise = dotSep parts
326 | otherwise = dotSep parts
327 where
327 where
328 parts = split op
328 parts = split op