@@ -340,7 +340,7 @@ translateExpression (SOp op vars)
340 , (arg:_) <- vars = translateVariableName arg ++ "[0]"
340 , (arg:_) <- vars = translateVariableName arg ++ "[0]"
341 | LStrRev <- op
341 | LStrRev <- op
342 , (arg:_) <- vars = let v = translateVariableName arg in
342 , (arg:_) <- vars = let v = translateVariableName arg in
343− v ++ "split('').reverse().join('')"
343+ v ++ ".split('').reverse().join('')"
344 | LStrIndex <- op
344 | LStrIndex <- op
345 , (lhs:rhs:_) <- vars = let l = translateVariableName lhs
345 , (lhs:rhs:_) <- vars = let l = translateVariableName lhs
346 r = translateVariableName rhs in
346 r = translateVariableName rhs in