From c2926c5ec74d7e37da395c8c32a7ff2b4cae7d06 Mon Sep 17 00:00:00 2001
From: Alexander M Pickering <alex@cogarr.net>
Date: Mon, 29 Jan 2024 16:20:10 -0600
Subject: All the files

---
 rewrite.lua | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 rewrite.lua

(limited to 'rewrite.lua')

diff --git a/rewrite.lua b/rewrite.lua
new file mode 100644
index 0000000..f132993
--- /dev/null
+++ b/rewrite.lua
@@ -0,0 +1,31 @@
+--[[Script to rewrite a stack traceback in terms of moonscript instead of lua]]
+
+for data in io.lines() do
+	local filename, linenum, rest = data:gmatch("(.*%.lua):(%d+):(.*)")()
+	if filename and linenum and rest then
+		local _,_,stripped_filename = filename:find("(%S+)")
+		local moonfilename = filename:gsub(".lua$",".moon")
+
+		--If our file is not moonscript, we won't have a debug file
+		local debugfile = io.open("debug/" .. stripped_filename.. ".X")
+		if not debugfile then
+			print("not debugfile")
+			print(data)
+			goto next
+		end
+
+		--Skip first line
+		debugfile:read("*l")
+		for line in debugfile:lines() do
+			_,_,pos,lua,moon = line:find("(%d+)%s+(%d+):%b[] >> (%d+)")
+			if tonumber(linenum) == tonumber(lua) then
+				print(string.format("\t%s:%d: %s",moonfilename,moon,rest))
+				goto next
+			end
+		end
+	else
+		print(data)
+	end
+	::next::
+end
+
-- 
cgit v1.2.3-70-g09d2