From 53bd1fcc4b90f24427064419354ad07c552a93d5 Mon Sep 17 00:00:00 2001 From: daurnimator Date: Wed, 26 Apr 2017 17:40:14 +1000 Subject: Remove lua.char --- src/lauxlib.js | 19 +++---- src/ldblib.js | 33 ++++++----- src/loslib.js | 1 - src/lstrlib.js | 173 ++++++++++++++++++++++++++++----------------------------- src/lua.js | 1 - 5 files changed, 111 insertions(+), 116 deletions(-) diff --git a/src/lauxlib.js b/src/lauxlib.js index f2cf220..f3287f5 100644 --- a/src/lauxlib.js +++ b/src/lauxlib.js @@ -6,7 +6,6 @@ const assert = require('assert'); const lstate = require('./lstate.js'); const lapi = require('./lapi.js'); const lua = require('./lua.js'); -const char = lua.char; const ldebug = require('./ldebug.js'); const lobject = require('./lobject.js'); @@ -57,7 +56,7 @@ const findfield = function(L, objidx, level) { */ const pushglobalfuncname = function(L, ar) { let top = lapi.lua_gettop(L); - ldebug.lua_getinfo(L, [char['f']], ar); /* push function */ + ldebug.lua_getinfo(L, ['f'.charCodeAt(0)], ar); /* push function */ lapi.lua_getfield(L, lua.LUA_REGISTRYINDEX, lua.to_luastring(LUA_LOADED_TABLE, true)); if (findfield(L, top + 1, 2)) { let name = lapi.lua_tostring(L, -1); @@ -78,15 +77,15 @@ const sv = s => s ? s : []; const pushfuncname = function(L, ar) { if (pushglobalfuncname(L, ar)) { /* try first a global name */ - lapi.lua_pushstring(L, lua.to_luastring("function '", true).concat(lapi.lua_tostring(L, -1)).concat([char["'"]])); + lapi.lua_pushstring(L, lua.to_luastring("function '", true).concat(lapi.lua_tostring(L, -1)).concat(["'".charCodeAt(0)])); lapi.lua_remove(L, -2); /* remove name */ } else if (ar.namewhat) /* is there a name from code? */ - lapi.lua_pushstring(L, sv(ar.namewhat).concat(char[" "], char["'"], ...sv(ar.name.value), char["'"])); /* use it */ - else if (ar.what && ar.what[0] === char['m']) /* main? */ + lapi.lua_pushstring(L, sv(ar.namewhat).concat(" ".charCodeAt(0), "'".charCodeAt(0), ...sv(ar.name.value), "'".charCodeAt(0))); /* use it */ + else if (ar.what && ar.what[0] === 'm'.charCodeAt(0)) /* main? */ lapi.lua_pushliteral(L, "main chunk"); - else if (ar.what && ar.what[0] != char['C']) /* for Lua functions, use */ - lapi.lua_pushstring(L, lua.to_luastring("function <", true).concat(...sv(ar.short_src), char[':'], ...lua.to_luastring(`${ar.linedefined}>`))); + else if (ar.what && ar.what[0] != 'C'.charCodeAt(0)) /* for Lua functions, use */ + lapi.lua_pushstring(L, lua.to_luastring("function <", true).concat(...sv(ar.short_src), ':'.charCodeAt(0), ...lua.to_luastring(`${ar.linedefined}>`))); else /* nothing left... */ lapi.lua_pushliteral(L, "?"); }; @@ -112,7 +111,7 @@ const luaL_traceback = function(L, L1, msg, level) { let last = lastlevel(L1); let n1 = last - level > LEVELS1 + LEVELS2 ? LEVELS1 : -1; if (msg) - lapi.lua_pushstring(L, msg.concat(char['\n'])); + lapi.lua_pushstring(L, msg.concat('\n'.charCodeAt(0))); luaL_checkstack(L, 10, null); lapi.lua_pushliteral(L, "stack traceback:"); while (ldebug.lua_getstack(L1, level++, ar)) { @@ -121,7 +120,7 @@ const luaL_traceback = function(L, L1, msg, level) { level = last - LEVELS2 + 1; /* and skip to last ones */ } else { ldebug.lua_getinfo(L1, lua.to_luastring("Slnt", true), ar); - lapi.lua_pushstring(L, [char['\n'], char['\t'], char['.'], char['.'], char['.']].concat(ar.short_src)); + lapi.lua_pushstring(L, ['\n'.charCodeAt(0), '\t'.charCodeAt(0), '.'.charCodeAt(0), '.'.charCodeAt(0), '.'.charCodeAt(0)].concat(ar.short_src)); if (ar.currentline > 0) lapi.lua_pushliteral(L, `${ar.currentline}:`); lapi.lua_pushliteral(L, " in "); @@ -153,7 +152,7 @@ const luaL_argerror = function(L, arg, extramsg) { } if (ar.name === null) - ar.name = pushglobalfuncname(L, ar) ? lapi.lua_tostring(L, -1) : [lua.char["?"]]; + ar.name = pushglobalfuncname(L, ar) ? lapi.lua_tostring(L, -1) : ["?".charCodeAt(0)]; return luaL_error(L, lua.to_luastring(`bad argument #${arg} to '${lobject.jsstring(ar.name)}' (${lobject.jsstring(extramsg)})`)); }; diff --git a/src/ldblib.js b/src/ldblib.js index fb2b8a2..62422a8 100644 --- a/src/ldblib.js +++ b/src/ldblib.js @@ -3,7 +3,6 @@ const assert = require('assert'); const lua = require('./lua.js'); -const char = lua.char; const lapi = require('./lapi.js'); const lauxlib = require('./lauxlib.js'); const ldebug = require('./ldebug.js'); @@ -126,7 +125,7 @@ const db_getinfo = function(L) { let options = lauxlib.luaL_optstring(L, arg + 2, lua.to_luastring("flnStu", true)); checkstack(L, L1, 3); if (lapi.lua_isfunction(L, arg + 1)) { /* info about a function? */ - options = [char['>']].concat(options); /* add '>' to 'options' */ + options = ['>'.charCodeAt(0)].concat(options); /* add '>' to 'options' */ lapi.lua_pushvalue(L, arg + 1); /* move function to 'L1' stack */ lapi.lua_xmove(L, L1, 1); } else { /* stack level */ @@ -139,28 +138,28 @@ const db_getinfo = function(L) { if (!ldebug.lua_getinfo(L1, options, ar)) lauxlib.luaL_argerror(L, arg + 2, lua.to_luastring("invalid option", true)); lapi.lua_newtable(L); /* table to collect results */ - if (options.indexOf(char['S']) > -1) { + if (options.indexOf('S'.charCodeAt(0)) > -1) { settabss(L, lua.to_luastring("source", true), ar.source.value); settabss(L, lua.to_luastring("short_src", true), ar.short_src); settabss(L, lua.to_luastring("linedefined", true), lua.to_luastring(`${ar.linedefined}`)); settabss(L, lua.to_luastring("lastlinedefined", true), lua.to_luastring(`${ar.lastlinedefined}`)); settabss(L, lua.to_luastring("what", true), ar.what); } - if (options.indexOf(char['l']) > -1) + if (options.indexOf('l'.charCodeAt(0)) > -1) settabsi(L, lua.to_luastring("currentline", true), ar.currentline); - if (options.indexOf(char['u']) > -1) + if (options.indexOf('u'.charCodeAt(0)) > -1) settabsi(L, lua.to_luastring("nups", true), ar.nups); settabsi(L, lua.to_luastring("nparams", true), ar.nparams); settabsb(L, lua.to_luastring("isvararg", true), ar.isvararg); - if (options.indexOf(char['n']) > - 1) { + if (options.indexOf('n'.charCodeAt(0)) > - 1) { settabss(L, lua.to_luastring("name", true), ar.name ? ar.name : null); settabss(L, lua.to_luastring("namewhat", true), ar.namewhat ? ar.namewhat : null); } - if (options.indexOf(char['t']) > - 1) + if (options.indexOf('t'.charCodeAt(0)) > - 1) settabsb(L, lua.to_luastring("istailcall", true), ar.istailcall); - if (options.indexOf(char['L']) > - 1) + if (options.indexOf('L'.charCodeAt(0)) > - 1) treatstackoption(L, L1, lua.to_luastring("activelines", true)); - if (options.indexOf(char['f']) > - 1) + if (options.indexOf('f'.charCodeAt(0)) > - 1) treatstackoption(L, L1, lua.to_luastring("func", true)); return 1; /* return table */ }; @@ -283,7 +282,7 @@ const hookf = function(L, ar) { if (ar.currentline >= 0) lapi.lua_pushinteger(L, ar.currentline); /* push current line */ else lapi.lua_pushnil(L); - assert(ldebug.lua_getinfo(L, [char["l"], char["S"]], ar)); + assert(ldebug.lua_getinfo(L, ["l".charCodeAt(0), "S".charCodeAt(0)], ar)); lapi.lua_call(L, 2, 0); /* call hook function */ } }; @@ -293,9 +292,9 @@ const hookf = function(L, ar) { */ const makemask = function(smask, count) { let mask = 0; - if (smask.indexOf(char["c"]) > -1) mask |= lua.LUA_MASKCALL; - if (smask.indexOf(char["r"]) > -1) mask |= lua.LUA_MASKRET; - if (smask.indexOf(char["l"]) > -1) mask |= lua.LUA_MASKLINE; + if (smask.indexOf("c".charCodeAt(0)) > -1) mask |= lua.LUA_MASKCALL; + if (smask.indexOf("r".charCodeAt(0)) > -1) mask |= lua.LUA_MASKRET; + if (smask.indexOf("l".charCodeAt(0)) > -1) mask |= lua.LUA_MASKLINE; if (count > 0) mask |= lua.LUA_MASKCOUNT; return mask; }; @@ -305,9 +304,9 @@ const makemask = function(smask, count) { */ const unmakemask = function(mask, smask) { let i = 0; - if (mask & lua.LUA_MASKCALL) smask[i++] = char["c"]; - if (mask & lua.LUA_MASKRET) smask[i++] = char["r"]; - if (mask & lua.LUA_MASKLINE) smask[i++] = char["l"]; + if (mask & lua.LUA_MASKCALL) smask[i++] = "c".charCodeAt(0); + if (mask & lua.LUA_MASKRET) smask[i++] = "r".charCodeAt(0); + if (mask & lua.LUA_MASKLINE) smask[i++] = "l".charCodeAt(0); return smask; }; @@ -330,7 +329,7 @@ const db_sethook = function(L) { lapi.lua_createtable(L, 0, 2); /* create a hook table */ lapi.lua_pushvalue(L, -1); lapi.lua_rawsetp(L, lua.LUA_REGISTRYINDEX, HOOKKEY); /* set it in position */ - lapi.lua_pushstring(L, [char["k"]]); + lapi.lua_pushstring(L, ["k".charCodeAt(0)]); lapi.lua_setfield(L, -2, lua.to_luastring("__mode", true)); /** hooktable.__mode = "k" */ lapi.lua_pushvalue(L, -1); lapi.lua_setmetatable(L, -2); /* setmetatable(hooktable) = hooktable */ diff --git a/src/loslib.js b/src/loslib.js index 4eea581..4a5c39d 100644 --- a/src/loslib.js +++ b/src/loslib.js @@ -3,7 +3,6 @@ const assert = require('assert'); const lua = require('./lua.js'); -const char = lua.char; const lapi = require('./lapi.js'); const lauxlib = require('./lauxlib.js'); const ldebug = require('./ldebug.js'); diff --git a/src/lstrlib.js b/src/lstrlib.js index 1935de3..2bfe2ee 100644 --- a/src/lstrlib.js +++ b/src/lstrlib.js @@ -9,10 +9,9 @@ const lobject = require('./lobject.js'); const lua = require('./lua.js'); const luaconf = require('./luaconf.js'); const llimit = require('./llimit.js'); -const char = lua.char; const sL_ESC = '%'; -const L_ESC = char[sL_ESC]; +const L_ESC = sL_ESC.charCodeAt(0); /* ** maximum number of captures that a pattern can do during @@ -95,7 +94,7 @@ const L_NBFD = 1; */ const adddigit = function(buff, n, x) { let d = Math.floor(x); /* get integer part from 'x' */ - buff[n] = d < 10 ? d + char['0'] : d - 10 + char['a']; /* add to buffer */ + buff[n] = d < 10 ? d + '0'.charCodeAt(0) : d - 10 + 'a'.charCodeAt(0); /* add to buffer */ return x - d; /* return what is left */ }; @@ -112,7 +111,7 @@ const num2straux = function(x) { /* create "0" or "-0" followed by exponent */ let zero = sprintf(luaconf.LUA_NUMBER_FMT + "x0p+0", x).split('').map(e => e.charCodeAt(0)); if (Object.is(x, -0)) - return [char['-']].concat(zero); + return ['-'.charCodeAt(0)].concat(zero); return zero; } else { let fe = lobject.frexp(x); /* 'x' fraction and exponent */ @@ -120,11 +119,11 @@ const num2straux = function(x) { let e = fe[1]; let n = 0; /* character count */ if (m < 0) { /* is number negative? */ - buff[n++] = char['-']; /* add signal */ + buff[n++] = '-'.charCodeAt(0); /* add signal */ m = -m; /* make it positive */ } - buff[n++] = char['0']; - buff[n++] = char['x']; /* add "0x" */ + buff[n++] = '0'.charCodeAt(0); + buff[n++] = 'x'.charCodeAt(0); /* add "0x" */ m = adddigit(buff, n++, m * (1 << L_NBFD)); /* add first digit */ e -= L_NBFD; /* this digit goes before the radix point */ if (m > 0) { /* more digits? */ @@ -140,10 +139,10 @@ const num2straux = function(x) { const lua_number2strx = function(L, fmt, x) { let buff = num2straux(x); - if (fmt[SIZELENMOD] === char['A']) { + if (fmt[SIZELENMOD] === 'A'.charCodeAt(0)) { for (let i = 0; i < buff.length; i++) - buff[i] = char[String.fromCharCode(buff[i]).toUpperCase()]; - } else if (fmt[SIZELENMOD] !== char['a']) + buff[i] = String.fromCharCode(buff[i]).toUpperCase().charCodeAt(0); + } else if (fmt[SIZELENMOD] !== 'a'.charCodeAt(0)) lauxlib.luaL_error(L, lua.to_luastring("modifiers for format '%a'/'%A' not implemented", true)); return buff; }; @@ -159,7 +158,7 @@ const MAX_ITEM = 120;// TODO: + l_mathlim(MAX_10_EXP); /* valid flags in a format specification */ -const FLAGS = [char["-"], char["+"], char[" "], char["#"], char["0"]]; +const FLAGS = ["-".charCodeAt(0), "+".charCodeAt(0), " ".charCodeAt(0), "#".charCodeAt(0), "0".charCodeAt(0)]; /* ** maximum size of each format specification (such as "%-099.99d") @@ -167,8 +166,8 @@ const FLAGS = [char["-"], char["+"], char[" "], char["#"], char["0"]]; const MAX_FORMAT = 32; // TODO: locale ? and do it better -const isalpha = e => (char['a'] <= e && e <= char['z']) || (e >= char['A'] && e <= char['Z']); -const isdigit = e => char['0'] <= e && e <= char['9']; +const isalpha = e => ('a'.charCodeAt(0) <= e && e <= 'z'.charCodeAt(0)) || (e >= 'A'.charCodeAt(0) && e <= 'Z'.charCodeAt(0)); +const isdigit = e => '0'.charCodeAt(0) <= e && e <= '9'.charCodeAt(0); const iscntrl = e => (0x00 <= e && e <= 0x1f) || e === 0x7f; const isgraph = e => e > 32 && e < 127; // TODO: Will only work for ASCII const islower = e => /^(?![A-Z]).*$/.test(String.fromCharCode(e)); @@ -185,11 +184,11 @@ const concat = function (a1, a2) { }; const addquoted = function(b, s) { - b.push(char['"']); + b.push('"'.charCodeAt(0)); let len = s.length; while (len--) { - if (s[0] === char['"'] || s[0] === char['\\'] || s[0] === char['\n']) { - b.push(char['\\']); + if (s[0] === '"'.charCodeAt(0) || s[0] === '\\'.charCodeAt(0) || s[0] === '\n'.charCodeAt(0)) { + b.push('\\'.charCodeAt(0)); b.push(s[0]); } else if (iscntrl(s[0])) { let buff = []; @@ -202,15 +201,15 @@ const addquoted = function(b, s) { b.push(s[0]); s = s.slice(1); } - b.push(char['"']); + b.push('"'.charCodeAt(0)); }; /* ** Ensures the 'buff' string uses a dot as the radix character. */ const checkdp = function(buff) { - if (buff.indexOf(char['.']) < 0) { /* no dot? */ - let point = char[luaconf.lua_getlocaledecpoint()]; /* try locale point */ + if (buff.indexOf('.'.charCodeAt(0)) < 0) { /* no dot? */ + let point = luaconf.lua_getlocaledecpoint().charCodeAt(0); /* try locale point */ let ppoint = buff.indexOf(point); if (ppoint) buff[ppoint] = '.'; /* change it to a dot */ } @@ -251,14 +250,14 @@ const scanformat = function(L, strfrmt, form) { lauxlib.luaL_error(L, lua.to_luastring("invalid format (repeated flags)", true)); if (isdigit(p[0])) p = p.slice(1); /* skip width */ if (isdigit(p[0])) p = p.slice(1); /* (2 digits at most) */ - if (p[0] === char['.']) { + if (p[0] === '.'.charCodeAt(0)) { p = p.slice(1); if (isdigit(p[0])) p = p.slice(1); /* skip precision */ if (isdigit(p[0])) p = p.slice(1); /* (2 digits at most) */ } if (isdigit(p[0])) lauxlib.luaL_error(L, lua.to_luastring("invalid format (width or precision too long)", true)); - form[0] = char["%"]; + form[0] = "%".charCodeAt(0); for (let i = 0; i < strfrmt.length - p.length + 1; i++) form[i + 1] = strfrmt[i]; // form[strfrmt.length - p.length + 2] = 0; @@ -344,7 +343,7 @@ const str_format = function(L) { lapi.lua_pop(L, 1); /* remove result from 'luaL_tolstring' */ } else { lauxlib.luaL_argcheck(L, s.length === strlen(s), arg, lua.to_luastring("string contains zeros", true)); - if (form.indexOf(char['.']) < 0 && s.length >= 100) { + if (form.indexOf('.'.charCodeAt(0)) < 0 && s.length >= 100) { /* no precision and string is too long to be formatted */ concat(b, s); /* keep entire string */ lapi.lua_pop(L, 1); /* remove result from 'luaL_tolstring' */ @@ -410,7 +409,7 @@ const KOption = { }; const digit = function(c) { - return char['0'] <= c && c <= char['9']; + return '0'.charCodeAt(0) <= c && c <= '9'.charCodeAt(0); }; const getnum = function(fmt, df) { @@ -419,7 +418,7 @@ const getnum = function(fmt, df) { else { let a = 0; do { - a = a * 10 + (fmt.s[0] - char['0']); + a = a * 10 + (fmt.s[0] - '0'.charCodeAt(0)); fmt.s = fmt.s.slice(1); } while (digit(fmt.s[0]) && a <= (MAXSIZE - 9)/10); return a; @@ -450,36 +449,36 @@ const getoption = function(h, fmt) { fmt.s = fmt.s.slice(1); r.size = 0; /* default */ switch (r.opt) { - case char['b']: r.size = 1; r.opt = KOption.Kint; return r; // sizeof(char): 1 - case char['B']: r.size = 1; r.opt = KOption.Kuint; return r; - case char['h']: r.size = 2; r.opt = KOption.Kint; return r; // sizeof(short): 2 - case char['H']: r.size = 2; r.opt = KOption.Kuint; return r; - case char['l']: r.size = 8; r.opt = KOption.Kint; return r; // sizeof(long): 8 - case char['L']: r.size = 8; r.opt = KOption.Kuint; return r; - case char['j']: r.size = 8; r.opt = KOption.Kint; return r; // sizeof(lua_Integer): 8 - case char['J']: r.size = 8; r.opt = KOption.Kuint; return r; - case char['T']: r.size = 8; r.opt = KOption.Kuint; return r; // sizeof(size_t): 8 - case char['f']: r.size = 4; r.opt = KOption.Kfloat; return r; // sizeof(float): 4 - case char['d']: r.size = 8; r.opt = KOption.Kfloat; return r; // sizeof(double): 8 - case char['n']: r.size = 8; r.opt = KOption.Kfloat; return r; // sizeof(lua_Number): 8 - case char['i']: r.size = getnumlimit(h, fmt, 4); r.opt = KOption.Kint; return r; // sizeof(int): 4 - case char['I']: r.size = getnumlimit(h, fmt, 4); r.opt = KOption.Kuint; return r; - case char['s']: r.size = getnumlimit(h, fmt, 8); r.opt = KOption.Kstring; return r; - case char['c']: { + case 'b'.charCodeAt(0): r.size = 1; r.opt = KOption.Kint; return r; // sizeof(char): 1 + case 'B'.charCodeAt(0): r.size = 1; r.opt = KOption.Kuint; return r; + case 'h'.charCodeAt(0): r.size = 2; r.opt = KOption.Kint; return r; // sizeof(short): 2 + case 'H'.charCodeAt(0): r.size = 2; r.opt = KOption.Kuint; return r; + case 'l'.charCodeAt(0): r.size = 8; r.opt = KOption.Kint; return r; // sizeof(long): 8 + case 'L'.charCodeAt(0): r.size = 8; r.opt = KOption.Kuint; return r; + case 'j'.charCodeAt(0): r.size = 8; r.opt = KOption.Kint; return r; // sizeof(lua_Integer): 8 + case 'J'.charCodeAt(0): r.size = 8; r.opt = KOption.Kuint; return r; + case 'T'.charCodeAt(0): r.size = 8; r.opt = KOption.Kuint; return r; // sizeof(size_t): 8 + case 'f'.charCodeAt(0): r.size = 4; r.opt = KOption.Kfloat; return r; // sizeof(float): 4 + case 'd'.charCodeAt(0): r.size = 8; r.opt = KOption.Kfloat; return r; // sizeof(double): 8 + case 'n'.charCodeAt(0): r.size = 8; r.opt = KOption.Kfloat; return r; // sizeof(lua_Number): 8 + case 'i'.charCodeAt(0): r.size = getnumlimit(h, fmt, 4); r.opt = KOption.Kint; return r; // sizeof(int): 4 + case 'I'.charCodeAt(0): r.size = getnumlimit(h, fmt, 4); r.opt = KOption.Kuint; return r; + case 's'.charCodeAt(0): r.size = getnumlimit(h, fmt, 8); r.opt = KOption.Kstring; return r; + case 'c'.charCodeAt(0): { r.size = getnum(fmt, -1); if (r.size === -1) lauxlib.luaL_error(h.L, lua.to_luastring("missing size for format option 'c'", true)); r.opt = KOption.Kchar; return r; } - case char['z']: r.opt = KOption.Kzstr; return r; - case char['x']: r.size = 1; r.opt = KOption.Kpadding; return r; - case char['X']: r.opt = KOption.Kpaddalign; return r; - case char[' ']: break; - case char['<']: h.islittle = true; break; - case char['>']: h.islittle = false; break; - case char['=']: h.islittle = true; break; - case char['!']: h.maxalign = getnumlimit(h, fmt, MAXALIGN); break; + case 'z'.charCodeAt(0): r.opt = KOption.Kzstr; return r; + case 'x'.charCodeAt(0): r.size = 1; r.opt = KOption.Kpadding; return r; + case 'X'.charCodeAt(0): r.opt = KOption.Kpaddalign; return r; + case ' '.charCodeAt(0): break; + case '<'.charCodeAt(0): h.islittle = true; break; + case '>'.charCodeAt(0): h.islittle = false; break; + case '='.charCodeAt(0): h.islittle = true; break; + case '!'.charCodeAt(0): h.maxalign = getnumlimit(h, fmt, MAXALIGN); break; default: lauxlib.luaL_error(h.L, lua.to_luastring(`invalid format option '${String.fromCharCode(r.opt)}'`)); } @@ -825,7 +824,7 @@ const str_unpack = function(L) { const CAP_UNFINISHED = -1; const CAP_POSITION = -2; const MAXCCALLS = 200; -const SPECIALS = [char["^"], char["$"], char["*"], char["+"], char["?"], char["."], char["("], char["["], char["%"], char["-"]]; +const SPECIALS = ["^".charCodeAt(0), "$".charCodeAt(0), "*".charCodeAt(0), "+".charCodeAt(0), "?".charCodeAt(0), ".".charCodeAt(0), "(".charCodeAt(0), "[".charCodeAt(0), "%".charCodeAt(0), "-".charCodeAt(0)]; class MatchState { constructor(L) { @@ -842,7 +841,7 @@ class MatchState { } const check_capture = function(ms, l) { - l = l - char['1']; + l = l - '1'.charCodeAt(0); if (l < 0 || l >= ms.level || ms.capture[l].len === CAP_UNFINISHED) return lauxlib.luaL_error(ms.L, lua.to_luastring(`invalid capture index %${l + 1}`)); return l; @@ -862,14 +861,14 @@ const classend = function(ms, p) { lauxlib.luaL_error(ms.L, lua.to_luastring("malformed pattern (ends with '%')", true)); return p + 1; } - case char['[']: { - if (ms.p[p] === char['^']) p++; + case '['.charCodeAt(0): { + if (ms.p[p] === '^'.charCodeAt(0)) p++; do { /* look for a ']' */ if (p === ms.p_end) lauxlib.luaL_error(ms.L, lua.to_luastring("malformed pattern (missing ']')", true)); if (ms.p[p++] === L_ESC && p < ms.p_end) p++; /* skip escapes (e.g. '%]') */ - } while (ms.p[p] !== char[']']); + } while (ms.p[p] !== ']'.charCodeAt(0)); return p + 1; } default: { @@ -881,17 +880,17 @@ const classend = function(ms, p) { const match_class = function(c, cl) { let res; switch (String.fromCharCode(cl).toLowerCase().charCodeAt(0)) { - case char['a'] : res = isalpha(c); break; - case char['c'] : res = iscntrl(c); break; - case char['d'] : res = isdigit(c); break; - case char['g'] : res = isgraph(c); break; - case char['l'] : res = islower(c); break; - case char['p'] : res = ispunct(c); break; - case char['s'] : res = isspace(c); break; - case char['u'] : res = isupper(c); break; - case char['w'] : res = isalnum(c); break; - case char['x'] : res = isxdigit(c); break; - case char['z'] : res = (c === 0); break; /* deprecated option */ + case 'a'.charCodeAt(0) : res = isalpha(c); break; + case 'c'.charCodeAt(0) : res = iscntrl(c); break; + case 'd'.charCodeAt(0) : res = isdigit(c); break; + case 'g'.charCodeAt(0) : res = isgraph(c); break; + case 'l'.charCodeAt(0) : res = islower(c); break; + case 'p'.charCodeAt(0) : res = ispunct(c); break; + case 's'.charCodeAt(0) : res = isspace(c); break; + case 'u'.charCodeAt(0) : res = isupper(c); break; + case 'w'.charCodeAt(0) : res = isalnum(c); break; + case 'x'.charCodeAt(0) : res = isxdigit(c); break; + case 'z'.charCodeAt(0) : res = (c === 0); break; /* deprecated option */ default: return (cl === c); } return (islower(cl) ? res : !res); @@ -899,7 +898,7 @@ const match_class = function(c, cl) { const matchbracketclass = function(ms, c, p, ec) { let sig = true; - if (ms.p[p + 1] === char['^']) { + if (ms.p[p + 1] === '^'.charCodeAt(0)) { sig = false; p++; /* skip the '^' */ } @@ -908,7 +907,7 @@ const matchbracketclass = function(ms, c, p, ec) { p++; if (match_class(c, ms.p[p])) return sig; - } else if (ms.p[p + 1] === char['-'] && p + 2 < ec) { + } else if (ms.p[p + 1] === '-'.charCodeAt(0) && p + 2 < ec) { p += 2; if (ms.p[p - 2] <= c && c <= ms.p[p]) return sig; @@ -923,9 +922,9 @@ const singlematch = function(ms, s, p, ep) { else { let c = ms.src[s]; switch (ms.p[p]) { - case char['.']: return true; /* matches any char */ + case '.'.charCodeAt(0): return true; /* matches any char */ case L_ESC: return match_class(c, ms.p[p + 1]); - case char['[']: return matchbracketclass(ms, c, p, ep - 1); + case '['.charCodeAt(0): return matchbracketclass(ms, c, p, ep - 1); default: return ms.p[p] === c; } } @@ -1014,19 +1013,19 @@ const match = function(ms, s, p) { while (gotoinit || gotodefault) { gotoinit = false; if (p !== ms.p_end) { /* end of pattern? */ - switch (gotodefault ? char['x'] : ms.p[p]) { - case char['(']: { /* start capture */ - if (ms.p[p + 1] === char[')']) /* position capture? */ + switch (gotodefault ? 'x'.charCodeAt(0) : ms.p[p]) { + case '('.charCodeAt(0): { /* start capture */ + if (ms.p[p + 1] === ')'.charCodeAt(0)) /* position capture? */ s = start_capture(ms, s, p + 2, CAP_POSITION); else s = start_capture(ms, s, p + 1, CAP_UNFINISHED); break; } - case char[')']: { /* end capture */ + case ')'.charCodeAt(0): { /* end capture */ s = end_capture(ms, s, p + 1); break; } - case char['$']: { + case '$'.charCodeAt(0): { if (p + 1 !== ms.p_end) { /* is the '$' the last char in pattern? */ gotodefault = true; /* no; go to default */ break; @@ -1036,7 +1035,7 @@ const match = function(ms, s, p) { } case L_ESC: { /* escaped sequences not in the format class[*+?-]? */ switch (ms.p[p + 1]) { - case char['b']: { /* balanced string? */ + case 'b'.charCodeAt(0): { /* balanced string? */ s = matchbalance(ms, s, p + 2); if (s !== null) { p = p.slice(4); @@ -1044,7 +1043,7 @@ const match = function(ms, s, p) { } break; } - case char['f']: { + case 'f'.charCodeAt(0): { p += 2; if (ms.p[p] !== '[') lauxlib.luaL_error(ms.L, lua.to_luastring(`missing '[' after '%f' in pattern`)); @@ -1056,9 +1055,9 @@ const match = function(ms, s, p) { s = null; /* match failed */ break; } - case char['0']: case char['1']: case char['2']: case char['3']: - case char['4']: case char['5']: case char['6']: case char['7']: - case char['8']: case char['9']: { /* capture results (%0-%9)? */ + case '0'.charCodeAt(0): case '1'.charCodeAt(0): case '2'.charCodeAt(0): case '3'.charCodeAt(0): + case '4'.charCodeAt(0): case '5'.charCodeAt(0): case '6'.charCodeAt(0): case '7'.charCodeAt(0): + case '8'.charCodeAt(0): case '9'.charCodeAt(0): { /* capture results (%0-%9)? */ s = match_capture(ms, s, ms.p[p + 1]); if (s !== null) { p += 2; gotoinit = true; @@ -1074,13 +1073,13 @@ const match = function(ms, s, p) { let ep = classend(ms, p); /* points to optional suffix */ /* does not match at least once? */ if (!singlematch(ms, s, p, ep)) { - if (ms.p[ep] === char['*'] || ms.p[ep] === char['?'] || ms.p[ep] === char['-']) { /* accept empty? */ + if (ms.p[ep] === '*'.charCodeAt(0) || ms.p[ep] === '?'.charCodeAt(0) || ms.p[ep] === '-'.charCodeAt(0)) { /* accept empty? */ p = ep + 1; gotoinit = true; break; } else /* '+' or no suffix */ s = null; /* fail */ } else { /* matched once */ switch (ms.p[ep]) { /* handle optional suffix */ - case char['?']: { /* optional */ + case '?'.charCodeAt(0): { /* optional */ let res; if ((res = match(ms, s + 1, ep + 1)) !== null) s = res; @@ -1089,12 +1088,12 @@ const match = function(ms, s, p) { } break; } - case char['+']: /* 1 or more repetitions */ + case '+'.charCodeAt(0): /* 1 or more repetitions */ s++; /* 1 match already done */ - case char['*']: /* 0 or more repetitions */ + case '*'.charCodeAt(0): /* 0 or more repetitions */ s = max_expand(ms, s, p, ep); break; - case char['-']: /* 0 or more repetitions (minimum) */ + case '-'.charCodeAt(0): /* 0 or more repetitions (minimum) */ s = min_expand(ms, s, p, ep); break; default: /* no suffix */ @@ -1205,7 +1204,7 @@ const str_find_aux = function(L, find) { } else { let ms = new MatchState(L); let s1 = init - 1; - let anchor = p[0] === char['^']; + let anchor = p[0] === '^'.charCodeAt(0); if (anchor) { p = p.slice(1); lp--; /* skip anchor character */ } @@ -1288,10 +1287,10 @@ const add_s = function(ms, b, s, e) { if (news[i] !== L_ESC) lauxlib.luaL_error(L, lua.to_luastring(`invalid use of '${sL_ESC}' in replacement string`)); lauxlib.luaL_addchar(b, news[i]); - } else if (news[i] === char['0']) + } else if (news[i] === '0'.charCodeAt(0)) lauxlib.luaL_addlstring(b, ms.src.slice(s), e - s); else { - push_onecapture(ms, news[i] - char['1'], s, e); + push_onecapture(ms, news[i] - '1'.charCodeAt(0), s, e); lauxlib.luaL_tolstring(L, -1); lapi.lua_remove(L, -2); /* remove original value */ lauxlib.luaL_addvalue(b); /* add capture to accumulated result */ @@ -1335,7 +1334,7 @@ const str_gsub = function(L) { let lastmatch = null; /* end of last match */ let tr = lapi.lua_type(L, 3); /* replacement type */ let max_s = lauxlib.luaL_optinteger(L, 4, srcl + 1); /* max replacements */ - let anchor = p[0] === char['^']; + let anchor = p[0] === '^'.charCodeAt(0); let n = 0; /* replacement count */ let ms = new MatchState(L); let b = new lauxlib.luaL_Buffer(L); diff --git a/src/lua.js b/src/lua.js index ec0b346..7e22b83 100644 --- a/src/lua.js +++ b/src/lua.js @@ -3,7 +3,6 @@ const defs = require("./defs.js"); -module.exports.char = defs.char; module.exports.FENGARI_AUTHORS = defs.FENGARI_AUTHORS; module.exports.FENGARI_COPYRIGHT = defs.FENGARI_COPYRIGHT; module.exports.FENGARI_RELEASE = defs.FENGARI_RELEASE; -- cgit v1.2.3-54-g00ecf