mirror of
https://github.com/gnosygnu/xowa.git
synced 2024-10-27 20:34:16 +00:00
| .. | ||
| luaj_xowa.jar | ||
| readme.txt | ||
NOTE: This page is also in XOWA under home/wiki/Help:Luaj
== Source ==
The luaj_xowa.jar was built using the source at http://sourceforge.net/projects/luaj/files/luaj-3.0/3.0-beta2/luaj-3.0-beta2.zip/download.
Its source is not currently included with XOWA. It is available at the following location: https://sourceforge.net/projects/xowa/files/support/luaj/
== Modification ==
The luaj_xowa.jar was created for the following reasons:
* Backward compatibility:
: Scribunto is currently using Lua 5.1 whereas luaj 3.0 is designed for Lua 5.2
: Lua 5.2 is not backward-compatible with Lua 5.1; several functions are obsoleted (for example, table.maxn)
: The luaj_xowa.jar was tailored to support Scribunto's 5.1 environment.
* Patches / bug fixes:
: Luaj has a handful of minor issues / defects. They are listed below.
== $engines variable ==
Note that the $engines variable refers to /xowa/bin/any/lua/mediawiki/extensions/Scribunto/engines/
== Luaj changes ==
=== Luaj 2.0.3 errors fixed in 3.0 ===
==== os.time doesn't handle dates before 1970 ====
* fix : incorrect Birth / Date; EX: ru.w:Пушкин,_Александр_Сергеевич
* file: /src/core/org/luaj/vm2/lib/OsLib.java
==== pairs.next fails when setting val to null ====
* fix : Finnish declension table; EX:d:Latvia
* file: /src/core/org/luaj/vm2/LuaTable.java
=== Luaj 2.0.3 features removed from 3.0 ===
==== string.gfind deprecated ====
* fix : missing Video_game_reviews; EX: w:Sonic_Heroes
* file: /src/core/org/luaj/vm2/lib/StringLib.java
* code: call
<pre>
old:
"sub"} );
new:
"sub", "gfind"} );
</pre>
* code: invoke
<pre>
add:
case 4:
case 9: return StringLib.gmatch( args );
</pre>
==== math.log10 deprecated ====
* fix : blank references; EX:w:Earth
* file: /src/jse/org/luaj/vm2/lib/JseMathLib.java
* code:
<pre>
math.set("log10", new log10());
static final class log10 extends UnaryOp { protected double call(double d) { return Math.log10(d); } }
</pre>
==== math.mod deprecated ====
* fix : missing table; EX:d:աղբիւր
* file: /src/core/org/luaj/vm2/lib/MathLib.java
* code:
<pre>
fmod fmod_func = new fmod();
math.set("mod", fmod_func);
math.set("fmod", fmod_func);
</pre>
==== table.maxn deprecated ====
file: /src/core/org/luaj/vm2/lib/TableLib.java
* code:
<pre>
public LuaValue getn() {
int len = length();
for (int n = len; n > 0; --n )
if ( !rawget(n).isnil() )
return LuaInteger.valueOf(n);
return ZERO;
}
</pre>
file: /src/core/org/luaj/vm2/lib/TableLib.java
<pre>
table.set("maxn", new maxn());
static class maxn extends OneArgFunction {
public LuaValue call(LuaValue arg) {
return LuaValue.valueOf(arg.checktable().maxn());
}
}
</pre>
==== table.getn deprecated ====
* fix : missing text; EX: d:aceite d:Module:pt-verb-form-of
* file: /src/core/org/luaj/vm2/LuaTable.java
code:
<pre>
public LuaValue getn() {
int len = length();
for (int n = len; n > 0; --n )
if ( !rawget(n).isnil() )
return LuaInteger.valueOf(n);
return ZERO;
}
</pre>
* file: /src/core/org/luaj/vm2/lib/TableLib.java
* code:
<pre>
table.set("getn", new getn());
static class getn extends OneArgFunction {
public LuaValue call(LuaValue arg) {
return arg.checktable().getn();
}
}
</pre>
==== automatic arg variable in varargs function deprecated ====
* fix : Horizontal timeline; EX: w:Cretaceous%E2%80%93Paleogene_extinction_event
* file: /src/core/org/luaj/vm2/LuaClosure.java
code:
<pre>
case Lua.OP_GETTABUP: /* A B C R(A) := UpValue[B][RK(C)] */
// stack[a] = upValues[i>>>23].getValue().get((c=(i>>14)&0x1ff)>0xff? k[c&0x0ff]: stack[c]);
// HACK: handle deprecated "arg" for "..."
int OP_GETTABUP_c = (i>>14)&0x1ff;
boolean OP_GETTABUP_b = OP_GETTABUP_c>0xff;
LuaValue OP_GETTABUP_idx = OP_GETTABUP_b ? k[OP_GETTABUP_c&0x0ff]: stack[OP_GETTABUP_c];
stack[a] = upValues[i>>>23].getValue().get(OP_GETTABUP_idx);
// HACK: handle deprecated "arg"
if ( p.is_vararg == 1
&& stack[a] == NIL
&& OP_GETTABUP_b
&& "arg".equals(OP_GETTABUP_idx.tojstring())
)
stack[a] = new LuaTable(varargs);
continue;
</pre>
=== Luaj 3.0 defects ===
==== os.date does not accept UTC format ====
* fix : incorrect age in ym; EX:w:Supreme_Court_of_the_United_States
* file: /src/core/org/luaj/vm2/lib/OsLib.java
* proc: invoke.DATE
<pre>
boolean utc = false;
if (s.startsWith("!")) {
utc = true;
s = s.substring(1);
}
if (s.equals("*t")) {
Calendar d = Calendar.getInstance();
long time_in_ms = (long)(t*1000);
if (utc) {
java.util.TimeZone current_tz = d.getTimeZone();
int offset_from_utc = current_tz.getOffset(time_in_ms);
time_in_ms += -offset_from_utc;
}
</pre>
==== string.gsub fails with out_of_bounds error ====
* fix : blank references; EX:w:Earth
* file: /src/core/org/luaj/vm2/lib/StringLib.java
* proc: gsub
<pre>
old:
if ( anchor )
break;
new:
if ( anchor )
break;
if (soffset >= srclen) break; // assert soffset is in bounds, else will throw ArrayIndexOutOfBounds exception;
</pre>
==== string.gsub fails if string is empty====
* fix : blank references; EX:w:Woburn,_Massachusetts
* file: /src/core/org/luaj/vm2/lib/StringLib.java
* proc: gsub
<pre>
static Varargs gsub( Varargs args ) {
LuaString src = args.checkstring( 1 );
final int srclen = src.length();
if (srclen == 0) return varargsOf(src, LuaValue.ZERO); // exit early
</pre>
==== string.format ignores precision for double args ====
* fix : Convert calls will show full precision for numbers; EX:w:Tomato
* file: /src/core/org/luaj/vm2/lib/StringLib.java
<pre>
old:
case 'G':
fdsc.format( result, args.checkdouble( arg ) );
new:
case 'c': // merged c with e E f F g G
fdsc.format( result, fmt.tojstring().substring(i - fdsc.length, i), args.checkdouble( arg ));
</pre>
* proc: format
<pre>
old:
buf.append( v) );
new:
try {
fmtstr = "%" + fmtstr; // % stripped above
buf.append( String.format(fmtstr, v) ); // call String.format
}catch (java.util.MissingFormatWidthException e) {
// HACK: handle invalid format of "%0.1f" -> "%.1f"; %0 should be followed by valid number, but in this case, ignore it;
String old_fmt = e.getFormatSpecifier();
if (old_fmt.startsWith("0")) {
String new_fmt = old_fmt.substring(1); // remove initial 0
fmtstr = fmtstr.replace(old_fmt, new_fmt);
buf.append( String.format(fmtstr, v) ); // call String.format
}
else
throw e;
}
</pre>
* note: forces a 1.5 JRE (as opposed to 1.3)
==== string.tonumber should trim all whitespace ====
* fix: Population tables; EX: w:Woburn,_Massachusetts
* file: /src/core/org/luaj/vm2/LuaString.java
* proc: scannumber
<pre>
// trim ws
int idx = i;
while (idx < j) {
switch (m_bytes[idx]) {
case 9: case 10: case 13: case 32:
++idx;
i = idx;
break;
default:
idx = j;
break;
}
}
idx = j - 1;
while (idx >= i) {
switch (m_bytes[idx]) {
case 9: case 10: case 13: case 32:
j = idx;
--idx;
break;
default:
idx = i -1;
break;
}
}
</pre>
==== multi-byte strings not fully supported ====
* fix : Thai calendar; EX:th.w:เหตุการณ์ปัจจุบัน
* file: /src/core/org/luaj/vm2/LuaString.java
<pre style='overflow:auto'>
public static LuaString valueOf(char[] chars, int off, int len) {
// COMMENTED: does not handle 2+ byte chars; assumes 1 char = 1 byte
// byte[] b = new byte[len];
// for ( int i=0; i<len; i++ )
// b[i] = (byte) chars[i + off];
// return valueOf(b, 0, len);
int bry_len = 0;
for (int i = 0; i < len; i++) // iterate over chars to sum all single / multi-byte chars
bry_len += LuaString.Utf8_len_by_int((int)(chars[i + off]));
byte[] bry = new byte[bry_len];
int bry_idx = 0;
for (int i = 0; i < len; i++) {
int c = (int)(chars[i + off]);
int c_len_in_bytes = LuaString.Utf8_encode_by_int(c, bry, bry_idx);
bry_idx += c_len_in_bytes;
}
return valueOf(bry, 0, bry_len);
}
public static String decodeAsUtf8(byte[] bytes, int offset, int length) {
// COMMENTED: does not handle 3+ byte chars
// int i,j,n,b;
// for ( i=offset,j=offset+length,n=0; i<j; ++n ) {
// switch ( 0xE0 & bytes[i++] ) {
// case 0xE0: ++i;
// case 0xC0: ++i;
// }
// }
// char[] chars=new char[n];
// for ( i=offset,j=offset+length,n=0; i<j; ) {
// chars[n++] = (char) (
// ((b=bytes[i++])>=0||i>=j)? b:
// (b<-32||i+1>=j)? (((b&0x3f) << 6) | (bytes[i++]&0x3f)):
// (((b&0xf) << 12) | ((bytes[i++]&0x3f)<<6) | (bytes[i++]&0x3f)));
// }
// return new String(chars);
return new String(bytes, offset, length, java.nio.charset.Charset.forName("UTF-8"));
}
public static int lengthAsUtf8(char[] chars) {
// COMMENTED: does not handle 3+ byte chars
// int i,b;
// char c;
// for ( i=b=chars.length; --i>=0; )
// if ( (c=chars[i]) >=0x80 )
// b += (c>=0x800)? 2: 1;
// return b;
int len = chars.length;
int rv = 0;
for (int i = 0; i < len; i++)
rv += LuaString.Utf8_len_by_int(chars[i]);
return rv;
}
public static int encodeToUtf8(char[] chars, int nchars, byte[] bytes, int off) {
// COMMENTED: does not handle 4+ byte chars; already using Encode_by_int, so might as well be consistent
// char c;
// int j = off;
// for ( int i=0; i<nchars; i++ ) {
// if ( (c = chars[i]) < 0x80 ) {
// bytes[j++] = (byte) c;
// } else if ( c < 0x800 ) {
// bytes[j++] = (byte) (0xC0 | ((c>>6) & 0x1f));
// bytes[j++] = (byte) (0x80 | ( c & 0x3f));
// } else {
// bytes[j++] = (byte) (0xE0 | ((c>>12) & 0x0f));
// bytes[j++] = (byte) (0x80 | ((c>>6) & 0x3f));
// bytes[j++] = (byte) (0x80 | ( c & 0x3f));
// }
// }
// return j - off;
int bry_idx = off;
for (int i = 0; i < nchars; i++ ) {
int c = chars[i];
int c_len_in_bytes = LuaString.Utf8_encode_by_int(c, bytes, bry_idx);
bry_idx += c_len_in_bytes;
}
return nchars; // NOTE: code returned # of bytes which is wrong; Globals.UTF8Stream.read caches rv as j which is used as index to char[] not byte[]; will throw out of bounds exception if bytes returned
}
public static int Utf8_len_by_int(int charAsInt) {
if (charAsInt < 0x80) return 1;
else if (charAsInt < (1 << 11)) return 2;
else if (charAsInt < (1 << 16)) return 3;
else if (charAsInt < (1 << 21)) return 4;
else if (charAsInt < (1 << 26)) return 5;
else return 6;
}
public static int Utf8_len_by_byte(byte b) {
int i = b & 0xff;
switch (i) {
case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: case 8: case 9: case 10: case 11: case 12: case 13: case 14: case 15:
case 16: case 17: case 18: case 19: case 20: case 21: case 22: case 23: case 24: case 25: case 26: case 27: case 28: case 29: case 30: case 31:
case 32: case 33: case 34: case 35: case 36: case 37: case 38: case 39: case 40: case 41: case 42: case 43: case 44: case 45: case 46: case 47:
case 48: case 49: case 50: case 51: case 52: case 53: case 54: case 55: case 56: case 57: case 58: case 59: case 60: case 61: case 62: case 63:
case 64: case 65: case 66: case 67: case 68: case 69: case 70: case 71: case 72: case 73: case 74: case 75: case 76: case 77: case 78: case 79:
case 80: case 81: case 82: case 83: case 84: case 85: case 86: case 87: case 88: case 89: case 90: case 91: case 92: case 93: case 94: case 95:
case 96: case 97: case 98: case 99: case 100: case 101: case 102: case 103: case 104: case 105: case 106: case 107: case 108: case 109: case 110: case 111:
case 112: case 113: case 114: case 115: case 116: case 117: case 118: case 119: case 120: case 121: case 122: case 123: case 124: case 125: case 126: case 127:
case 128: case 129: case 130: case 131: case 132: case 133: case 134: case 135: case 136: case 137: case 138: case 139: case 140: case 141: case 142: case 143:
case 144: case 145: case 146: case 147: case 148: case 149: case 150: case 151: case 152: case 153: case 154: case 155: case 156: case 157: case 158: case 159:
case 160: case 161: case 162: case 163: case 164: case 165: case 166: case 167: case 168: case 169: case 170: case 171: case 172: case 173: case 174: case 175:
case 176: case 177: case 178: case 179: case 180: case 181: case 182: case 183: case 184: case 185: case 186: case 187: case 188: case 189: case 190: case 191:
return 1;
case 192: case 193: case 194: case 195: case 196: case 197: case 198: case 199: case 200: case 201: case 202: case 203: case 204: case 205: case 206: case 207:
case 208: case 209: case 210: case 211: case 212: case 213: case 214: case 215: case 216: case 217: case 218: case 219: case 220: case 221: case 222: case 223:
return 2;
case 224: case 225: case 226: case 227: case 228: case 229: case 230: case 231: case 232: case 233: case 234: case 235: case 236: case 237: case 238: case 239:
return 3;
case 240: case 241: case 242: case 243: case 244: case 245: case 246: case 247:
return 4;
case 248: case 249: case 250: case 251:
return 5;
case 252: case 253:
return 6;
case 254: case 255:
default:
return 6;
}
}
public static int Utf8_decode_to_int(byte[] ary, int pos) {
byte b0 = ary[pos];
if ((b0 & 0x80) == 0) {
return b0;
}
else if ((b0 & 0xE0) == 0xC0) {
return ( b0 & 0x1f) << 6
| ( ary[pos + 1] & 0x3f)
;
}
else if ((b0 & 0xF0) == 0xE0) {
return ( b0 & 0x0f) << 12
| ((ary[pos + 1] & 0x3f) << 6)
| ( ary[pos + 2] & 0x3f)
;
}
else if ((b0 & 0xF8) == 0xF0) {
return ( b0 & 0x07) << 18
| ((ary[pos + 1] & 0x3f) << 12)
| ((ary[pos + 2] & 0x3f) << 6)
| ( ary[pos + 3] & 0x3f)
;
}
else if ((b0 & 0xFC) == 0xF8) {
return ( b0 & 0x03) << 24
| ((ary[pos + 1] & 0x3f) << 18)
| ((ary[pos + 2] & 0x3f) << 12)
| ((ary[pos + 3] & 0x3f) << 6)
| ( ary[pos + 4] & 0x3f)
;
}
else if ((b0 & 0xFC) == 0xFC) {
return ( b0 & 0x03) << 30
| ((ary[pos + 1] & 0x3f) << 24)
| ((ary[pos + 2] & 0x3f) << 18)
| ((ary[pos + 3] & 0x3f) << 12)
| ((ary[pos + 4] & 0x3f) << 6)
| ( ary[pos + 5] & 0x3f)
;
}
else {
return b0 & 0xFF;
}
}
public static int Utf8_encode_by_int(int charAsInt, byte[] src, int pos) {
if (charAsInt < 0x80) {
src[pos] = (byte)charAsInt;
return 1;
}
else if (charAsInt < (1 << 11)) {
src[pos] = (byte)(0xC0 | (charAsInt >> 6));
src[++pos] = (byte)(0x80 | (charAsInt & 0x3F));
return 2;
}
else if (charAsInt < (1 << 16)) {
src[pos] = (byte)(0xE0 | (charAsInt >> 12));
src[++pos] = (byte)(0x80 | (charAsInt >> 6) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt & 0x3F));
return 3;
}
else if (charAsInt < (1 << 21)) {
src[pos] = (byte)(0xF0 | (charAsInt >> 18));
src[++pos] = (byte)(0x80 | (charAsInt >> 12) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 6) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt & 0x3F));
return 4;
}
else if (charAsInt < (1 << 26)) {
src[pos] = (byte)(0xF8 | (charAsInt >> 24));
src[++pos] = (byte)(0x80 | (charAsInt >> 18) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 12) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 6) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt & 0x3F));
return 5;
}
else if (charAsInt < (1 << 31)) {
src[pos] = (byte)(0xFC | (charAsInt >> 30));
src[++pos] = (byte)(0x80 | (charAsInt >> 24) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 18) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 12) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt >> 6) & 0x3F);
src[++pos] = (byte)(0x80 | (charAsInt & 0x3F));
return 6;
}
else if (charAsInt == 0) {
src[pos] = (byte)0xC0;
src[++pos] = (byte)0x80;
return -1;
}
return -1;
}
</pre>
* file: /src/core/org/luaj/vm2/compiler/LexState.java
* proc: read_string
<pre style='overflow:auto'>
if (c > UCHAR_MAX)
lexerror("escape sequence too large", TK_STRING);
save(c, false); // NOTE: specify that c is integer and does not need conversion; EX: \128 -> 128 -> (char)128, not Utf8_encode(128)
</pre>
* file: /src/core/org/luaj/vm2/compiler/LexState.java
<pre style='overflow:auto'>
void save(int c) {save(c, true);}
void save(int c, boolean c_might_be_utf8) {
int bytes_len = c_might_be_utf8 ? LuaString.Utf8_len_by_byte((byte)c) : 1;
if (bytes_len > 1) { // c is 1st byte of utf8 multi-byte sequence; read required number of bytes and convert to char; EX: ← is serialized in z as 226,134,144; c is currently 226; read 134 and 144 and convert to ←
temp_bry[0] = (byte)c;
for (int i = 1; i < bytes_len; i++) {
nextChar();
temp_bry[i] = (byte)current;
}
c = LuaString.Utf8_decode_to_int(temp_bry, 0);
}
if ( buff == null || nbuff + 1 > buff.length )
buff = LuaC.realloc( buff, nbuff*2+1 );
buff[nbuff++] = (char)c;
}
private static byte[] temp_bry = new byte[6];
</pre>
=== build.xml ===
* note: this change is needed to get luaj to compile with the String.format(String, double) call
* file: build.xml
<pre>
old:
<javac destdir="build/jme/classes" encoding="utf-8" source="1.3" target="1.2" bootclasspathref="wtk-libs"
srcdir="build/jme/src"/>
<javac destdir="build/jse/classes" encoding="utf-8" source="1.3" target="1.3"
classpath="lib/bcel-5.2.jar"
srcdir="build/jse/src"
excludes="**/script/*,**/Lua2Java*,lua*"/>
<javac destdir="build/jse/classes" encoding="utf-8" source="1.5" target="1.5"
classpath="build/jse/classes"
srcdir="build/jse/src"
includes="**/script/*,**/Lua2Java*"/>
<javac destdir="build/jse/classes" encoding="utf-8" source="1.3" target="1.3"
classpath="build/jse/classes"
srcdir="build/jse/src"
includes="lua*"/>
new:
<javac destdir="build/jse/classes" encoding="utf-8" source="1.5" target="1.5"
classpath="lib/bcel-5.2.jar"
srcdir="build/jse/src"
excludes="**/script/*,**/Lua2Java*,lua*"/>
<javac destdir="build/jse/classes" encoding="utf-8" source="1.5" target="1.5"
classpath="build/jse/classes"
srcdir="build/jse/src"
includes="**/script/*,**/Lua2Java*"/>
<javac destdir="build/jse/classes" encoding="utf-8" source="1.5" target="1.5"
classpath="build/jse/classes"
srcdir="build/jse/src"
includes="lua*"/>
</pre>
=== Luaj tests ===
<pre>
package org.luaj.vm2;
import org.luaj.vm2.lib.StringLib;
import junit.framework.*;
public class Xowa_tst extends TestCase {
private Xowa_fxt fxt = new Xowa_fxt();
public void test_tonumber_ws() {
fxt.Test_tonumber_int("123" , 123);
fxt.Test_tonumber_int("\t\n\r 123\t\n\r" , 123);
fxt.Test_tonumber_nil("1a");
fxt.Test_tonumber_nil("1 2");
fxt.Test_tonumber_nil("");
fxt.Test_tonumber_nil("\t\n\r \t\n\r");
}
public void test_gsub() {
fxt.Test_gsub("abc", "a", "A", "Abc"); // basic
fxt.Test_gsub("a#b", "#", "", "ab"); // match() fails when shortening string
fxt.Test_gsub("", "%b<>", "A", ""); // balance() fails with out of index when find is blank
}
public void test_format() {
fxt.Test_format("%.1f" , "1.23", "1.2"); // apply precision; 1 decimal place
fxt.Test_format("(%.1f)", "1.23", "(1.2)"); // handle substring; format_string should be "%.1f" not "(%.1f)"
fxt.Test_format("%0.1f" , "1.23", "1.2"); // handle invalid precision of 0
}
}
class Xowa_fxt {
public void Test_tonumber_int(String raw, int expd) {
LuaString actl_str = LuaString.valueOf(raw);
LuaInteger actl_int = (LuaInteger)actl_str.tonumber();
Assert.assertEquals(expd, actl_int.v);
}
public void Test_tonumber_nil(String raw) {
LuaString actl_str = LuaString.valueOf(raw);
Assert.assertEquals(LuaValue.NIL, actl_str.tonumber());
}
public void Test_gsub(String text, String regx, String repl, String expd) {
Varargs actl_args = StringLib.gsub_test(LuaValue.varargsOf(new LuaValue[] {LuaValue.valueOf(text), LuaValue.valueOf(regx), LuaValue.valueOf(repl)}));
Assert.assertEquals(expd, actl_args.checkstring(1).tojstring());
}
public void Test_format(String fmt, String val, String expd) {
Varargs actl_args = StringLib.format_test(LuaValue.varargsOf(new LuaValue[] {LuaValue.valueOf(fmt), LuaValue.valueOf(val)}));
Assert.assertEquals(expd, actl_args.checkstring(1).tojstring());
}
}
</pre>
== Scribunto related ==
None of these changes affect the luaj_xowa.jar. They are noted for comprehensiveness's sake.
=== getfenv/setfenv deprecated ===
* add lua-compat-env
: source: https://github.com/davidm/lua-compat-env
: target: $engines/LuaCommon/lualib/lua-compat-env .lua
* add alias to $engines/Luaj/mw_main.lua
: _G.getfenv = require 'compat_env'.getfenv
: _G.setfenv = require 'compat_env'.setfenv
* change xowa.jar to load debugLibrary
: Globals.load(new DebugLib());
=== loadString deprecated ===
* add alias to $engines/Luaj/mw_main.lua
: _G.loadstring = load
=== table.unpack deprecated ===
* add alias to $engines/Luaj/mw_main.lua
: _G.unpack = table.unpack