From 6258925c955a31ac0c520ffabdbaf138910e48c1 Mon Sep 17 00:00:00 2001
From: Benoit Giannangeli <giann008@gmail.com>
Date: Wed, 3 May 2017 15:58:45 +0200
Subject: package.searchpath

---
 src/loadlib.js | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

(limited to 'src/loadlib.js')

diff --git a/src/loadlib.js b/src/loadlib.js
index f25e5dc..a161d49 100644
--- a/src/loadlib.js
+++ b/src/loadlib.js
@@ -217,6 +217,22 @@ const searchpath = function(L, name, path, sep, dirsep) {
     return null;  /* not found */
 };
 
+const ll_searchpath = function(L) {
+    let f = searchpath(
+        L,
+        lauxlib.luaL_checkstring(L, 1),
+        lauxlib.luaL_checkstring(L, 2),
+        lauxlib.luaL_optstring(L, 3, [".".charCodeAt(0)]),
+        lauxlib.luaL_optstring(L, 4, [lua.LUA_DIRSEP.charCodeAt(0)])
+    );
+    if (f !== null) return 1;
+    else {  /* error message is on top of the stack */
+        lua.lua_pushnil(L);
+        lua.lua_insert(L, -2);
+        return 2;  /* return nil + error message */
+    }
+};
+
 const findfile = function(L, name, pname, dirsep) {
     lua.lua_getfield(L, lua.lua_upvalueindex(1), pname);
     let path = lua.lua_tostring(L, -1);
@@ -348,7 +364,8 @@ const ll_require = function(L) {
 };
 
 const pk_funcs = {
-    "loadlib": ll_loadlib
+    "loadlib": ll_loadlib,
+    "searchpath": ll_searchpath
 };
 
 const ll_funcs = {
-- 
cgit v1.2.3-54-g00ecf