From 20e9078039f9d6cd1dd4fd5b84c6ff84f925182f Mon Sep 17 00:00:00 2001
From: Alexey Romanoff <ar@logiceditor.com>
Date: Wed, 9 Nov 2022 11:39:10 +0300
Subject: [PATCH] lua-parser/parser.lua: add feature for returning the detailed
 error

---
 lua-parser/parser.lua | 18 +++++++++++++++---
 1 file changed, 15 insertions(+), 3 deletions(-)

diff --git a/lua-parser/parser.lua b/lua-parser/parser.lua
index fcd880a..cb0cdb8 100644
--- a/lua-parser/parser.lua
+++ b/lua-parser/parser.lua
@@ -456,7 +456,7 @@ local G = { V"Lua",
   PowOp     = sym("^")   / "pow";
 }
 
-local parser = {}
+local parser = { detailed_errors = false }
 
 local validator = require("lua-parser.validator")
 local validate = validator.validate
@@ -467,8 +467,20 @@ function parser.parse (subject, filename)
   lpeg.setmaxstack(1000)
   local ast, label, errorpos = lpeg.match(G, subject, nil, errorinfo)
   if not ast then
-    local errmsg = labels[label][2]
-    return ast, syntaxerror(errorinfo, errorpos, errmsg)
+    if parser.detailed_errors then
+      local re = require "relabel"
+      local line, col = re.calcline(subject, errorpos)
+      return ast, {
+        line = line;
+        column = col;
+        id = labels[label][1];
+        message = labels[label][2];
+        position = errorpos;
+      }
+    else
+      local errmsg = labels[label][2]
+      return ast, syntaxerror(errorinfo, errorpos, errmsg)
+    end
   end
   return validate(ast, errorinfo)
 end