open-autonomous-connection/luaj
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 2 Wiki Activity

Improve compatibility with C-based lua.

Browse Source
This commit is contained in:
James Roseborough
2010-04-28 03:30:37 +00:00
parent fa9d7dfe20
commit 3ca4849033
3 changed files with 51 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/core/org/luaj/vm2/LuaError.java
View File

@@ -40,10 +40,14 @@ public class LuaError extends RuntimeException {
private static String errorHook(String msg) {
LuaThread thread = LuaThread.getRunning();
if ( thread.err != null ) {
LuaValue errfunc = thread.err;
thread.err = null;
try {
return thread.err.call( LuaValue.valueOf(msg) ).tojstring();
return errfunc.call( LuaValue.valueOf(msg) ).tojstring();
} catch ( Throwable t ) {
return "error in error handling";
} finally {
thread.err = errfunc;
}
}
return msg;

61
src/core/org/luaj/vm2/lib/BaseLib.java
View File

@@ -238,43 +238,21 @@ public class BaseLib extends OneArgFunction implements ResourceFinder {
return varargsOf(NIL, valueOf(e.getMessage()));
}
case 5: // "pcall", // (f, arg1, ...) -> status, result1, ...
{
LuaThread.onCall(this);
try {
LuaThread.onCall(this);
try {
return varargsOf(LuaValue.TRUE, args.arg1().invoke(args.subargs(2)));
} finally {
LuaThread.onReturn();
}
} catch ( LuaError le ) {
String m = le.getMessage();
return varargsOf(FALSE, m!=null? valueOf(m): NIL);
} catch ( Exception e ) {
String m = e.getMessage();
return varargsOf(FALSE, valueOf(m!=null? m: e.toString()));
return pcall(args.arg1(),args.subargs(2),null);
} finally {
LuaThread.onReturn();
}
}
case 6: // "xpcall", // (f, err) -> result1, ...
{
LuaValue errfunc = args.checkvalue(2);
LuaThread.onCall(this);
try {
LuaThread.onCall(this);
try {
LuaThread thread = LuaThread.getRunning();
LuaValue olderr = thread.err;
try {
thread.err = errfunc;
return varargsOf(LuaValue.TRUE, args.arg1().invoke(args.subargs(2)));
} finally {
thread.err = olderr;
}
} finally {
LuaThread.onReturn();
}
} catch ( LuaError le ) {
String m = le.getMessage();
return varargsOf(FALSE, m!=null? valueOf(m): NIL);
} catch ( Exception e ) {
String m = e.getMessage();
return varargsOf(FALSE, valueOf(m!=null? m: e.toString()));
return pcall(args.arg1(),NONE,args.checkvalue(2));
} finally {
LuaThread.onReturn();
}
}
case 7: // "print", // (...) -> void
@@ -358,6 +336,25 @@ public class BaseLib extends OneArgFunction implements ResourceFinder {
}
}
public static Varargs pcall(LuaValue func, Varargs args, LuaValue errfunc) {
try {
LuaThread thread = LuaThread.getRunning();
LuaValue olderr = thread.err;
try {
thread.err = errfunc;
return varargsOf(LuaValue.TRUE, func.invoke(args));
} finally {
thread.err = olderr;
}
} catch ( LuaError le ) {
String m = le.getMessage();
return varargsOf(FALSE, m!=null? valueOf(m): NIL);
} catch ( Exception e ) {
String m = e.getMessage();
return varargsOf(FALSE, valueOf(m!=null? m: e.toString()));
}
}
public static Varargs loadFile(String filename) throws IOException {
InputStream is = FINDER.findResource(filename);
if ( is == null )