git.iko.soy/Idris-dev
on master help sign in
javascript: added string equality
78521b6raichoo
src/IRTS/CodegenJavaScript.hs+2
compare with master
unifiedsplit
@@ -278,6 +278,8 @@ translateExpression _ (SOp op vars)
278
278
279 | LStrConcat <- op
279 | LStrConcat <- op
280 , (lhs:rhs:_) <- vars = translateBinaryOp "+" lhs rhs
280 , (lhs:rhs:_) <- vars = translateBinaryOp "+" lhs rhs
281+ | LStrEq <- op
282+ , (lhs:rhs:_) <- vars = translateBinaryOp "=" lhs rhs
281
283
282 | LIntStr <- op
284 | LIntStr <- op
283 , (arg:_) <- vars = "String(" ++ translateVariableName arg ++ ");"
285 , (arg:_) <- vars = "String(" ++ translateVariableName arg ++ ");"