git.iko.soy/Idris-dev
on master help sign in
javascript: added StrCons primitive
22ce6bfraichoo
src/IRTS/CodegenJavaScript.hs+2
compare with master
unifiedsplit
@@ -288,6 +288,8 @@ translateExpression _ (SOp op vars)
288 , (lhs:rhs:_) <- vars = translateBinaryOp "+" lhs rhs
288 , (lhs:rhs:_) <- vars = translateBinaryOp "+" lhs rhs
289 | LStrEq <- op
289 | LStrEq <- op
290 , (lhs:rhs:_) <- vars = translateBinaryOp "==" lhs rhs
290 , (lhs:rhs:_) <- vars = translateBinaryOp "==" lhs rhs
291+ | LStrCons <- op
292+ , (lhs:rhs:_) <- vars = translateBinaryOp "+" lhs rhs
291
293
292 | LIntStr <- op
294 | LIntStr <- op
293 , (arg:_) <- vars = "String(" ++ translateVariableName arg ++ ");"
295 , (arg:_) <- vars = "String(" ++ translateVariableName arg ++ ");"