Included a minimal json lib in yue compiler tool.

1 files changed, 9 insertions, 1 deletions

diff --git a/src/yue.cpp b/src/yue.cpp
index 2c3a469..aebc31d 100644
--- a/src/yue.cpp
+++ b/src/yue.cpp
@@ -72,18 +72,26 @@ extern "C" {
 #include "lua.h"
 #include "lualib.h"
 int luaopen_yue(lua_State* L);
+int luaopen_colibc_json(lua_State* L);
 } // extern "C"
 
 static void openlibs(void* state) {
         lua_State* L = static_cast<lua_State*>(state);
         luaL_openlibs(L);
+        int top = lua_gettop(L);
 #if LUA_VERSION_NUM > 501
         luaL_requiref(L, "yue", luaopen_yue, 0);
+        luaL_requiref(L, "json", luaopen_colibc_json, 0);
 #else
         lua_pushcfunction(L, luaopen_yue);
         lua_call(L, 0, 0);
+        lua_getglobal(L, "package"); // package
+        lua_getfield(L, -1, "loaded"); // package loaded
+        lua_pushcfunction(L, luaopen_colibc_json);
+        lua_call(L, 0, 1); // package loaded json
+        lua_setfield(L, -2, "json"); // loaded["json"] = json, package loaded
 #endif
-        lua_pop(L, 1);
+        lua_settop(L, top);
 }
 
 void pushYue(lua_State* L, std::string_view name) {