Fix invalid escape when using special characters

edubart · Mar 9, 2020 · a8410a6 · a8410a6
1 parent db4ed1f
commit a8410a6
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 6 deletions.
diff --git a/nelua/utils/pegger.lua b/nelua/utils/pegger.lua
@@ -28,10 +28,10 @@ local c_quote_patt_end = "\
 
 local quotes_defs = {
   to_special_character_lua = function(s)
-    return '\\' .. string.byte(s)
+    return string.format('\\%03d', string.byte(s))
   end,
   to_special_character_c = function(s)
-    return string.format('\\x%02x', string.byte(s))
+    return string.format('\\%03o', string.byte(s))
   end
 }
 

diff --git a/spec/003-pegger_spec.lua b/spec/003-pegger_spec.lua
@@ -18,8 +18,8 @@ it("c double quoting", function()
   assert.same(q "\n", [["\n"]])
   assert.same(q "\r", [["\r"]])
   assert.same(q "\v", [["\v"]])
-  assert.same(q "\001", [["\x01"]])
-  assert.same(q "\255", [["\xff"]])
+  assert.same(q "\001", [["\001"]])
+  assert.same(q "\255", [["\377"]])
 
   -- trigraphs
   assert.same(q "??=", [["?\?="]])

diff --git a/spec/04-luagenerator_spec.lua b/spec/04-luagenerator_spec.lua
@@ -26,7 +26,7 @@ end)
 it("string", function()
   assert.generate_lua([[return 'a', "b", [=[c]=] ]], [[return "a", "b", "c"]])
   assert.generate_lua([[return "'", '"']])
-  assert.generate_lua([[return "'\1", '"\1']])
+  assert.generate_lua([[return "'\001", '"\001']])
 end)
 it("boolean", function()
   assert.generate_lua("return true, false")

diff --git a/spec/05-cgenerator_spec.lua b/spec/05-cgenerator_spec.lua
@@ -82,7 +82,7 @@ end)
 
 it("string", function()
   assert.generate_c([[local a = "hello"]], [["hello"]])
-  assert.generate_c([[local a = "\x01"]], [["\x01"]])
+  assert.generate_c([[local a = "\001"]], [["\001"]])
 end)
 
 it("boolean", function()