ast_to_src: format function calls and unary operators without space

diff --git a/metalua/compiler/ast_to_src.mlua b/metalua/compiler/ast_to_src.mlua
index 5bf96650a97b19a575d19ce0b6ab6fd7372cbac4..2245c2f45f0c0058db3a146595b7c3451a345a3d 100644 (file)
--- a/metalua/compiler/ast_to_src.mlua
+++ b/metalua/compiler/ast_to_src.mlua
@@ -150,8 +150,8 @@ local op_symbol = {
    div    = " / ",   mod     = " % ",   pow     = " ^ ",
    concat = " .. ",  eq      = " == ",  ne      = " ~= ",
    lt     = " < ",   le      = " <= ",  ["and"] = " and ",
-   ["or"] = " or ",  ["not"] = "not ",  len     = "# ",
-   ["unm"] = " - ",
+   ["or"] = " or ",  ["not"] = "not ",  len     = "#",
+   ["unm"] = "-",
 }
 
 --------------------------------------------------------------------------------
@@ -432,7 +432,7 @@ function M:Call (node, f)
    self:acc  (wrap and "(" or "")
    self:node (f)
    self:acc  (wrap and ")" or "")
-   self:acc  (parens and " (" or  " ")
+   self:acc  (parens and "(" or  " ")
    self:list (node, ", ", 2) -- skip `f'.
    self:acc  (parens and ")")
 end