convert moon.moon -> moon.h, and run it through the moon.c entry point

Author: leafo

Makefile

@@ -63,7 +63,12 @@ bin/binaries/moonscript.h: moonscript/*.lua moon/*.lua
 	xxd -i moonscript.lua > $@
 	rm moonscript.lua
 
-dist/moon: lua-$(LUA_SRC_VERSION)/src/liblua.a lpeg-$(LPEG_VERSION)/lptree.c bin/binaries/moonscript.h
+bin/binaries/moon.h: bin/moon
+	awk 'FNR>1' bin/moon > moon.lua
+	xxd -i moon.lua > $@
+	rm moon.lua
+
+dist/moon: lua-$(LUA_SRC_VERSION)/src/liblua.a lpeg-$(LPEG_VERSION)/lptree.c bin/binaries/moonscript.h bin/binaries/moon.h
 	mkdir -p dist
 	gcc -static -o dist/moon \
 		-Ilua-$(LUA_SRC_VERSION)/src/ \

bin/binaries/moon.c

@@ -3,6 +3,8 @@
 #include <lauxlib.h>
 #include <stdio.h>
 
+#include "moon.h"  // the CLI script
+
 // from moonscript.c
 extern int luaopen_moonscript(lua_State *l);
 
@@ -12,17 +14,25 @@ int main(int argc, char **argv) {
 
     // Load moonscript (this also loads lpeg)
     luaopen_moonscript(l);
-    lua_pop(l, 1); // pop the return value
+    lua_pop(l, 1);
 
-    // Simple test: require moonscript and compile something
-    const char *test_code =
-        "local moonscript = require('moonscript')\n"
-        "local code = moonscript.to_lua('print \"hello from moonscript\"')\n"
-        "print(code)\n"
-        "loadstring(code)()\n";
+    // Set up arg table
+    lua_newtable(l);
+    lua_pushstring(l, "moon");
+    lua_rawseti(l, -2, -1);
+    for (int i = 0; i < argc; i++) {
+        lua_pushstring(l, argv[i]);
+        lua_rawseti(l, -2, i);
+    }
+    lua_setglobal(l, "arg");
 
-    if (luaL_dostring(l, test_code) != 0) {
-        fprintf(stderr, "Test failed: %s\n", lua_tostring(l, -1));
+    // Load and execute the moon CLI script
+    if (luaL_loadbuffer(l, (const char *)moon_lua, moon_lua_len, "moon") != 0) {
+        fprintf(stderr, "Failed to load moon: %s\n", lua_tostring(l, -1));
+        return 1;
+    }
+    if (lua_pcall(l, 0, 0, 0) != 0) {
+        fprintf(stderr, "Error: %s\n", lua_tostring(l, -1));
         return 1;
     }