Special case string concat

Author: tekknolagi

scrapscript.py

@@ -4411,6 +4411,7 @@ def int_as_str(obj: Object) -> String:
 . compile =
   | {type="Int", value=value} -> $$int_as_str value
   | {type="Var", name=name} -> name
+  | {type="Binop", op="++", left=left, right=right} -> (compile left) ++ "+" ++ (compile right)
   | {type="Binop", op=op, left=left, right=right} -> (compile left) ++ op ++ (compile right)
   | {type="List", items=items} -> "[" ++ (join ", " (map compile items)) ++ "]"
   | {type="Assign", name=name, value=value} -> "((" ++ name ++ ") =>" ++ (compile value) ++ ")("