From 84c986dffe7a85c87b80e6d736b3b36e460ff4dd Mon Sep 17 00:00:00 2001
From: Juan Marín Noguera <juan@mnpi.eu>
Date: Thu, 5 Dec 2024 13:24:52 +0100
Subject: Update instructions to apply to Guile

Also rename `main` to `main.lua` and `main.scm` to `main`.
---
 main.lua | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100755 main.lua

(limited to 'main.lua')

diff --git a/main.lua b/main.lua
new file mode 100755
index 0000000..38189ee
--- /dev/null
+++ b/main.lua
@@ -0,0 +1,29 @@
+#!/usr/bin/lua
+
+if #arg < 1 or #arg > 2 then
+    error ("Syntax: %s <DAY><a|b> [inputfile]"):format(arg[0])
+    os.exit(1)
+end
+
+local num, letter = arg[1]:match("^(%d+)([ab])$")
+if not num then
+    error ('Expected <DAY><a|b> as first argument (e.g. "01b"), got: %s'):format(arg[1])
+    os.exit(1)
+end
+num = tonumber(num)
+
+local script = ("%02d.lua"):format(num)
+local infile = arg[2] or ("%02d.in"):format(num)
+local input_stream = io.open(infile)
+if input_stream then
+    io.input(input_stream)
+else
+    print "Reading from standard input."
+end
+
+local parsed = loadfile(script)()
+if letter == 'a' then
+    parsed:part1()
+else
+    parsed:part2()
+end
-- 
cgit v1.2.3