subscript 7.6.2 → 8.0.1

package/justin.js

@@ -1,41 +1,31 @@
 // justin lang https://github.com/endojs/Jessie/issues/66
-import { skip, cur, idx, err, expr, lookup, token, binary } from './parse.js'
-import compile, { operator } from './compile.js'
-import subscript, { set } from './subscript.js'
-
-const PERIOD = 46, OPAREN = 40, CPAREN = 41, OBRACK = 91, CBRACK = 93, SPACE = 32, DQUOTE = 34, QUOTE = 39, _0 = 48, _9 = 57, BSLASH = 92,
-  PREC_SEQ = 1, PREC_COND = 3, PREC_SOME = 4, PREC_EVERY = 5, PREC_OR = 6, PREC_XOR = 7, PREC_AND = 8,
-  PREC_EQ = 9, PREC_COMP = 10, PREC_SHIFT = 11, PREC_SUM = 12, PREC_MULT = 13, PREC_EXP = 14, PREC_UNARY = 15, PREC_POSTFIX = 16, PREC_CALL = 18, PREC_GROUP = 19
-
-let escape = { n: '\n', r: '\r', t: '\t', b: '\b', f: '\f', v: '\v' },
-  string = q => (qc, c, str = '') => {
-    qc && err('Unexpected string') // must not follow another token
-    skip() // first quote
-    while (c = cur.charCodeAt(idx), c - q) {
-      if (c === BSLASH) skip(), c = skip(), str += escape[c] || c
-      else str += skip()
-    }
-    skip() || err('Bad string')
-    return ['', str]
-  }
+import { skip, cur, idx, err, expr, lookup, token, binary, unary } from './src/parse.js'
+import compile, { operator } from './src/compile.js'
+import { CPAREN, COLON, PREC_ASSIGN, PREC_PREFIX, PREC_OR, PREC_ACCESS, PREC_COMP, PREC_EXP, PREC_GROUP } from './src/const.js'
+
+// register subscript operators set
+import subscript from './subscript.js'
+import './feature/comment.js'
+import './feature/pow.js'
+import './feature/in.js'
+import './feature/ternary.js'
+import './feature/bool.js'
+import './feature/array.js'
+import './feature/object.js'
 
 // operators
 // set('===', PREC_EQ, (a, b) => a === b)
 // set('!==', PREC_EQ, (a, b) => a !== b)
-set('~', PREC_UNARY, (a) => ~a)
-
-// ?:
-token('?', PREC_COND, (a, b, c) => a && (b = expr(2, 58)) && (c = expr(3), ['?', a, b, c]))
-operator('?', (a, b, c) => (a = compile(a), b = compile(b), c = compile(c), ctx => a(ctx) ? b(ctx) : c(ctx)))
-
-set('??', PREC_OR, (a, b) => a ?? b)
+binary('??', PREC_OR), operator('??', (a, b) => b && (a = compile(a), b = compile(b), ctx => a(ctx) ?? b(ctx)))
 
 // a?.[, a?.( - postfix operator
-token('?.', PREC_CALL, a => a && ['?.', a])
+token('?.', PREC_ACCESS, a => a && ['?.', a])
+// a ?.
 operator('?.', a => (a = compile(a), ctx => a(ctx) || (() => { })))
 
 // a?.b, a?.() - optional chain operator
-token('?.', PREC_CALL, (a, b) => a && (b = expr(PREC_CALL), !b?.map) && (b ? ['?.', a, b] : ['?.', a, b]))
+token('?.', PREC_ACCESS, (a, b) => a && (b = expr(PREC_ACCESS), !b?.map) && ['?.', a, b])
+// a ?. b
 operator('?.', (a, b) => b && (a = compile(a), ctx => a(ctx)?.[b]))
 
 // a?.x() - keep context, but watch out a?.()
@@ -43,59 +33,22 @@ operator('(', (a, b, container, args, path, optional) => (b != null) && (a[0] ==
   args = b == '' ? () => [] : // a()
     b[0] === ',' ? (b = b.slice(1).map(compile), ctx => b.map(a => a(ctx))) : // a(b,c)
       (b = compile(b), ctx => [b(ctx)]), // a(b)
+
   // a?.()
   !a[2] && (optional = true, a = a[1]),
+
   // a?.['x']?.()
-  a[0] === '[' ? (path = compile(a[2])) : (path = ctx => a[2]),
+  a[0] === '[' ? (path = compile(a[2])) : (path = () => a[2]),
   (container = compile(a[1]), optional ?
     ctx => (container(ctx)?.[path(ctx)]?.(...args(ctx))) :
     ctx => (container(ctx)?.[path(ctx)](...args(ctx)))
   )
 ))
 
-// a in b
-set('in', PREC_COMP, (a, b) => a in b)
-
-// "' with /
-lookup[DQUOTE] = string(DQUOTE)
-lookup[QUOTE] = string(QUOTE)
-
-// /**/, //
-token('/*', 20, (a, prec) => (skip(c => c !== 42 && cur.charCodeAt(idx + 1) !== 47), skip(2), a || expr(prec) || ['']))
-token('//', 20, (a, prec) => (skip(c => c >= 32), a || expr(prec) || ['']))
-
 // literals
-token('null', 20, a => a ? err() : ['', null])
-token('true', 20, a => a ? err() : ['', true])
-token('false', 20, a => a ? err() : ['', false])
-// token('undefined', 20, a => a ? err() : ['', undefined])
-// token('NaN', 20, a => a ? err() : ['', NaN])
-
-set(';', -1, (...args) => args[args.length - 1])
-
-// right order
-// '**', (a,prec,b=expr(PREC_EXP-1)) => ctx=>a(ctx)**b(ctx), PREC_EXP,
-set('**', -PREC_EXP, (a, b) => a ** b)
-
-// [a,b,c]
-token('[', 20, (a) => !a && ['[', expr(0, 93) || ''])
-operator('[', (a, b) => !b && (
-  !a ? () => [] : // []
-    a[0] === ',' ? (a = a.slice(1).map(compile), ctx => a.map(a => a(ctx))) : // [a,b,c]
-      (a = compile(a), ctx => [a(ctx)]) // [a]
-))
-
-// {a:1, b:2, c:3}
-token('{', 20, a => !a && (['{', expr(0, 125) || '']))
-operator('{', (a, b) => (
-  !a ? ctx => ({}) : // {}
-    a[0] === ',' ? (a = a.slice(1).map(compile), ctx => Object.fromEntries(a.map(a => a(ctx)))) : // {a:1,b:2}
-      a[0] === ':' ? (a = compile(a), ctx => Object.fromEntries([a(ctx)])) : // {a:1}
-        (b = compile(a), ctx => ({ [a]: b(ctx) }))
-))
-
-token(':', 1.1, (a, b) => (b = expr(1.1) || err(), [':', a, b]))
-operator(':', (a, b) => (b = compile(b), a = Array.isArray(a) ? compile(a) : (a => a).bind(0, a), ctx => [a(ctx), b(ctx)]))
+token('null', 20, a => a ? err() : [, null])
+// token('undefined', 20, a => a ? err() : [, undefined])
+// token('NaN', 20, a => a ? err() : [, NaN])
 
 export default subscript
 export * from './subscript.js'

package/justin.min.js

@@ -1 +1 @@
-let e,t,r=r=>(e=0,t=r,r=n(),t[e]?l():r||""),l=(r="Bad syntax",l=t[e],a=t.slice(0,e).split("\n"),n=a.pop())=>{let s=t.slice(e-108,e).split("\n").pop(),i=t.slice(e+1,e+108).split("\n").shift();throw EvalError(`${r} at ${a.length}:${n.length} \`${s+l+i}\``,"font-weight: bold")},a=(r=1,l=e,a)=>{if("number"==typeof r)e+=r;else for(;a=r(t.charCodeAt(e));)e+=a;return t.slice(l,e)},n=(t=0,a,n,s,i,p)=>{for(;(n=r.space())&&(i=((p=o[n])&&p(s,t))??(!s&&r.id()));)s=i;return a&&(n==a?e++:l()),s},s=e=>e>=48&&e<=57||e>=65&&e<=90||e>=97&&e<=122||36==e||95==e||e>=192&&215!=e&&247!=e,i=r.space=r=>{for(;(r=t.charCodeAt(e))<=32;)e++;return r},p=r.id=e=>a(s),o=[],h=(r,l=32,a,n=r.charCodeAt(0),i=r.length,p=o[n],h=r.toUpperCase()!==r)=>o[n]=(n,o,c=e)=>o<l&&(i<2||t.substr(e,i)==r)&&(!h||!s(t.charCodeAt(e+i)))&&(e+=i,a(n,o))||(e=c,p?.(n,o)),c=(e,t,r=0)=>h(e,t,((l,a)=>l&&(a=n(t-r/2))&&[e,l,a])),f=(e,t,r)=>h(e,t,(l=>r?l&&[e,l]:!l&&(l=n(t-.5))&&[e,l])),g=(e,t,r)=>{h(e,t,((l,a)=>(l||r)&&((a=n(t))||r)&&((!l||l[0]!==e)&&(l=[e,l]),(a||r)&&l.push(a),l)))};const u=e=>Array.isArray(e)?d[e[0]](...e.slice(1)):t=>t?.[e],d={},m=(e,t,r=d[e])=>d[e]=(...e)=>t(...e)||r&&r(...e),A=e=>(e=r(e),t=>(e.call?e:e=u(e))(t)),b=(e,t,r)=>r.length?r.length>1?(c(e,Math.abs(t),t<0),m(e,((e,t)=>t&&(e=u(e),t=u(t),e.length||t.length?l=>r(e(l),t(l)):(e=r(e(),t()),()=>e))))):(f(e,t),m(e,((e,t)=>!t&&((e=u(e)).length?t=>r(e(t)):(e=r(e()),()=>e))))):(g(e,Math.abs(t),t<0),m(e,((...e)=>(e=e.map(u),t=>r(...e.map((e=>e(t)))))))),y=e=>e?l():["",(e=+a((e=>46===e||e>=48&&e<=57||(69===e||101===e?2:0))))!=e?l():e],C=(e,t,r,l)=>(h(e,t,(r=>r?["++"===e?"-":"+",[e,r],["",1]]:[e,n(t-1)])),m(e,l=(e,t)=>"("===e[0]?l(e[1]):"."===e[0]?(t=e[2],e=u(e[1]),l=>r(e(l),t)):"["===e[0]?([,e,t]=e,e=u(e),t=u(t),l=>r(e(l),t(l))):t=>r(t,e)));m("",(e=>()=>e)),o[34]=e=>e?l():["",(a()+a((e=>e-34?1:0))+(a()||l("Bad string"))).slice(1,-1)],o[46]=e=>!e&&y();for(let e=0;e<=9;e++)o[48+e]=y;b(",",1,((...e)=>e[e.length-1])),b("||",4,((...e)=>{let t,r=0;for(;!t&&r<e.length;)t=e[r++];return t})),b("&&",5,((...e)=>{let t=0,r=!0;for(;r&&t<e.length;)r=e[t++];return r})),c("=",10,!0),m("=",((e,t)=>{let r,a,n=u(t),s="string"==typeof e?(t,r)=>t[e]=r:"."===e[0]?(r=u(e[1]),a=e[2],(e,t)=>r(e)[a]=t):"["===e[0]?(r=u(e[1]),a=u(e[2]),(e,t)=>r(e)[a(e)]=t):l("Bad left value");return e=>s(e,n(e))})),b("+",12,((e,t)=>e+t)),b("-",12,((e,t)=>e-t)),b("*",13,((e,t)=>e*t)),b("/",13,((e,t)=>e/t)),b("%",13,((e,t)=>e%t)),b("|",6,((e,t)=>e|t)),b("&",8,((e,t)=>e&t)),b("^",7,((e,t)=>e^t)),b("==",9,((e,t)=>e==t)),b("!=",9,((e,t)=>e!=t)),b(">",10,((e,t)=>e>t)),b(">=",10,((e,t)=>e>=t)),b("<",10,((e,t)=>e<t)),b("<=",10,((e,t)=>e<=t)),b(">>",11,((e,t)=>e>>t)),b(">>>",11,((e,t)=>e>>>t)),b("<<",11,((e,t)=>e<<t)),b("+",15,(e=>+e)),b("-",15,(e=>-e)),b("!",15,(e=>!e)),C("++",15,((e,t)=>++e[t])),C("--",15,((e,t)=>--e[t])),h("[",18,(e=>e&&["[",e,n(0,93)||l()])),m("[",((e,t)=>t&&(e=u(e),t=u(t),r=>e(r)[t(r)]))),h(".",18,((e,t)=>e&&(t=n(18))&&[".",e,t])),m(".",((e,t)=>(e=u(e),t=t[0]?t:t[1],r=>e(r)[t]))),h("(",18,(e=>!e&&["(",n(0,41)||l()])),h("(",18,((e,t)=>e&&((t=n(0,41))?["(",e,t]:["(",e,""]))),m("(",((e,t,r,l,a)=>null==t?u(e):(a=""==t?()=>[]:","===t[0]?(t=t.slice(1).map(u),e=>t.map((t=>t(e)))):(t=u(t),e=>[t(e)]),"."===e[0]?(r=e[2],e=u(e[1]),t=>e(t)[r](...a(t))):"["===e[0]?(r=u(e[2]),e=u(e[1]),t=>e(t)[r(t)](...a(t))):(e=u(e),t=>e(t)(...a(t))))));let v={n:"\n",r:"\r",t:"\t",b:"\b",f:"\f",v:"\v"},B=r=>(n,s,i="")=>{for(n&&l("Unexpected string"),a();(s=t.charCodeAt(e))-r;)92===s?(a(),s=a(),i+=v[s]||s):i+=a();return a()||l("Bad string"),["",i]};b("~",15,(e=>~e)),h("?",3,((e,t,r)=>e&&(t=n(2,58))&&["?",e,t,n(3)])),m("?",((e,t,r)=>(e=u(e),t=u(t),r=u(r),l=>e(l)?t(l):r(l)))),b("??",6,((e,t)=>e??t)),h("?.",18,(e=>e&&["?.",e])),m("?.",(e=>(e=u(e),t=>e(t)||(()=>{})))),h("?.",18,((e,t)=>e&&!(t=n(18))?.map&&["?.",e,t])),m("?.",((e,t)=>t&&(e=u(e),r=>e(r)?.[t]))),m("(",((e,t,r,l,a,n)=>null!=t&&"?."===e[0]&&(e[2]||Array.isArray(e[1]))&&(l=""==t?()=>[]:","===t[0]?(t=t.slice(1).map(u),e=>t.map((t=>t(e)))):(t=u(t),e=>[t(e)]),!e[2]&&(e=e[1]),a="["===e[0]?u(e[2]):t=>e[2],r=u(e[1]),e=>r(e)?.[a(e)]?.(...l(e))))),b("in",10,((e,t)=>e in t)),o[34]=B(34),o[39]=B(39),h("/*",20,((r,l)=>(a((r=>42!==r&&47!==t.charCodeAt(e+1))),a(2),r||n(l)||[""]))),h("//",20,((e,t)=>(a((e=>e>=32)),e||n(t)||[""]))),h("null",20,(e=>e?l():["",null])),h("true",20,(e=>e?l():["",!0])),h("false",20,(e=>e?l():["",!1])),b(";",-1,((...e)=>e[e.length-1])),b("**",-14,((e,t)=>e**t)),h("[",20,(e=>!e&&["[",n(0,93)||""])),m("[",((e,t)=>!t&&(e?","===e[0]?(e=e.slice(1).map(u),t=>e.map((e=>e(t)))):(e=u(e),t=>[e(t)]):()=>[]))),h("{",20,(e=>!e&&["{",n(0,125)||""])),m("{",((e,t)=>e?","===e[0]?(e=e.slice(1).map(u),t=>Object.fromEntries(e.map((e=>e(t))))):":"===e[0]?(e=u(e),t=>Object.fromEntries([e(t)])):(t=u(e),r=>({[e]:t(r)})):e=>({}))),h(":",1.1,((e,t)=>[":",e,n(1.1)||l()])),m(":",((e,t)=>(t=u(t),e=Array.isArray(e)?u(e):(e=>e).bind(0,e),r=>[e(r),t(r)])));export{c as binary,u as compile,t as cur,A as default,l as err,n as expr,p as id,e as idx,s as isId,o as lookup,g as nary,m as operator,d as operators,r as parse,b as set,a as skip,i as space,h as token,f as unary};
+let r,e,t=t=>(r=0,e=t,t=i(),e[r]?a():t||""),a=(t="Bad syntax",a=e.slice(0,r).split("\n"),n=a.pop())=>{let i=e.slice(r-108,r).split("\n").pop(),s=e.slice(r,r+108).split("\n").shift();throw EvalError(`${t} at ${a.length}:${n.length} \`${r>=108?"…":""}${i}▶${s}\``,"font-weight: bold")},n=(t=1,a=r,n)=>{if("number"==typeof t)r+=t;else for(;n=t(e.charCodeAt(r));)r+=n;return e.slice(a,r)},i=(e=0,n,i,s,l,p)=>{for(;(i=t.space())&&(l=((p=o[i])&&p(s,e))??(!s&&t.id()));)s=l;return n&&(i==n?r++:a()),s},s=r=>r>=48&&r<=57||r>=65&&r<=90||r>=97&&r<=122||36==r||95==r||r>=192&&215!=r&&247!=r,l=t.id=r=>n(s),p=t.space=t=>{for(;(t=e.charCodeAt(r))<=32;)r++;return t},o=[],c=(t,a=32,n,i=t.charCodeAt(0),l=t.length,p=o[i],c=t.toUpperCase()!==t)=>o[i]=(i,o,f=r)=>o<a&&(l<2||e.substr(r,l)==t)&&(!c||!s(e.charCodeAt(r+l)))&&(r+=l,n(i,o))||(r=f,p?.(i,o)),f=(r,e,t=0)=>c(r,e,((a,n)=>a&&(n=i(e-t/2))&&[r,a,n])),d=(r,e,t)=>c(r,e,(a=>t?a&&[r,a]:!a&&(a=i(e-.5))&&[r,a])),u=(r,e,t)=>{c(r,e,((a,n)=>(a||t)&&((n=i(e))||t)&&((!a||a[0]!==r)&&(a=[r,a]),(n||t)&&a.push(n),a)))};const m=r=>Array.isArray(r)?r[0]?h[r[0]](...r.slice(1)):()=>r[1]:e=>e?.[r],h={},b=(r,e,t=h[r])=>h[r]=(...r)=>e(...r)||t&&t(...r),A=(r,e,t)=>"()"===r[0]?A(r[1],e,t):"string"==typeof r?e.bind(0,(r=>r),(()=>r)):"."===r[0]?e.bind(0,m(r[1]),(r=r[2],()=>r)):"["===r[0]?e.bind(0,m(r[1]),m(r[2])):t?(r=m(r),e.bind(0,(e=>[r(e)]),(()=>0))):()=>a("Bad left value"),y=r=>r?a():[,(r=+n((r=>46===r||r>=48&&r<=57||(69===r||101===r?2:0))))!=r?a():r];o[46]=r=>!r&&y();for(let r=48;r<=57;r++)o[r]=y;const g={n:"\n",r:"\r",t:"\t",b:"\b",f:"\f",v:"\v"},C=t=>(i,s,l="")=>{for(i&&a("Unexpected string"),n();(s=e.charCodeAt(r))-t;)92===s?(n(),s=n(),l+=g[s]||s):l+=n();return n()||a("Bad string"),[,l]};o[34]=C(34),o[39]=C(39),c("(",17,((r,e)=>r&&((e=i(0,41))?["(",r,e]:["(",r,""]))),b("(",((r,e,t)=>(t=""==e?()=>[]:","===e[0]?(e=e.slice(1).map(m),r=>e.map((e=>e(r)))):(e=m(e),r=>[e(r)]),A(r,((r,e,a)=>r(a)[e(a)](...t(a))),!0)))),c("[",17,(r=>r&&["[",r,i(0,93)||a()])),b("[",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)[e(t)]))),c(".",17,((r,e)=>r&&(e=i(17))&&[".",r,e])),b(".",((r,e)=>(r=m(r),e=e[0]?e:e[1],t=>r(t)[e]))),c("(",17,(r=>!r&&["()",i(0,41)||a("Empty group")])),b("()",(r=>m(r)));const $=(...r)=>(r=r.map(m),e=>r.map((r=>r(e))).pop());u(",",1),b(",",$),u(";",1,!0),b(";",$),f("*",12),b("*",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)*e(t)))),f("/",12),b("/",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)/e(t)))),f("%",12),b("%",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)%e(t)))),f("*=",2,!0),b("*=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]*=e(a)))))),f("/=",2,!0),b("/=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]/=e(a)))))),f("%=",2,!0),b("%=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]%=e(a)))))),d("+",14),b("+",((r,e)=>!e&&(r=m(r),e=>+r(e)))),d("-",14),b("-",((r,e)=>!e&&(r=m(r),e=>-r(e)))),f("+",11),b("+",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)+e(t)))),f("-",11),b("-",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)-e(t)))),f("+=",2,!0),b("+=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]+=e(a)))))),f("-=",2,!0),b("-=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]-=e(a)))))),c("++",15,(r=>r?["-",["++",r],[,1]]:["++",i(14)])),b("++",(r=>A(r,((r,e,t)=>++r(t)[e(t)])))),c("--",15,(r=>r?["+",["--",r],[,1]]:["--",i(14)])),b("--",(r=>A(r,((r,e,t)=>--r(t)[e(t)])))),d("~",14),b("~",((r,e)=>!e&&(r=m(r),e=>~r(e)))),f("|",5),b("|",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)|e(t)))),f("&",7),b("&",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)&e(t)))),f("^",6),b("^",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)^e(t)))),f(">>",10),b(">>",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)>>e(t)))),f("<<",10),b("<<",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)<<e(t)))),f("==",8),b("==",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)==e(t)))),f("!=",8),b("!=",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)!=e(t)))),f(">",8),b(">",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)>e(t)))),f("<",8),b("<",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)<e(t)))),f(">=",8),b(">=",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)>=e(t)))),f("<=",8),b("<=",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)<=e(t)))),d("!",14),b("!",((r,e)=>!e&&(r=m(r),e=>!r(e)))),u("||",3),b("||",((...r)=>(r=r.map(m),e=>{let t,a;for(t of r)if(a=t(e))return a;return a}))),u("&&",4),b("&&",((...r)=>(r=r.map(m),e=>{let t,a;for(t of r)if(!(a=t(e)))return a;return a}))),f("=",2,!0),b("=",((r,e)=>(e=m(e),A(r,((r,t,a)=>r(a)[t(a)]=e(a))))));var v=r=>m(t(r));c("/*",20,((t,a)=>(n((t=>42!==t&&47!==e.charCodeAt(r+1))),n(2),t||i(a)||[""]))),c("//",20,((r,e)=>(n((r=>r>=32)),r||i(e)||[""]))),f("**",13,!0),b("**",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)**e(t)))),f("in",9),b("in",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)in e(t)))),c("?",2,((r,e,t)=>r&&(e=i(2,58))&&["?",r,e,i(3)])),b("?",((r,e,t)=>(r=m(r),e=m(e),t=m(t),a=>r(a)?e(a):t(a)))),c("true",20,(r=>r?err():[,!0])),c("false",20,(r=>r?err():[,!1])),c("[",20,(r=>!r&&["[",i(0,93)||""])),b("[",((r,e)=>!e&&(r?","===r[0]?(r=r.slice(1).map(m),e=>r.map((r=>r(e)))):(r=m(r),e=>[r(e)]):()=>[]))),c("{",20,(r=>!r&&["{",i(0,125)||""])),b("{",((r,e)=>r?","===r[0]?(r=r.slice(1).map(m),e=>Object.fromEntries(r.map((r=>r(e))))):":"===r[0]?(r=m(r),e=>Object.fromEntries([r(e)])):(e=m(r),t=>({[r]:e(t)})):r=>({}))),c(":",1.1,((r,e)=>[":",r,i(1.1)||err()])),b(":",((r,e)=>(e=m(e),r=Array.isArray(r)?m(r):(r=>r).bind(0,r),t=>[r(t),e(t)]))),f("??",5),b("??",((r,e)=>e&&(r=m(r),e=m(e),t=>r(t)??e(t)))),c("?.",17,(r=>r&&["?.",r])),b("?.",(r=>(r=m(r),e=>r(e)||(()=>{})))),c("?.",17,((r,e)=>r&&!(e=i(17))?.map&&["?.",r,e])),b("?.",((r,e)=>e&&(r=m(r),t=>r(t)?.[e]))),b("(",((r,e,t,a,n,i)=>null!=e&&"?."===r[0]&&(r[2]||Array.isArray(r[1]))&&(a=""==e?()=>[]:","===e[0]?(e=e.slice(1).map(m),r=>e.map((e=>e(r)))):(e=m(e),r=>[e(r)]),!r[2]&&(r=r[1]),n="["===r[0]?m(r[2]):()=>r[2],t=m(r[1]),r=>t(r)?.[n(r)]?.(...a(r))))),c("null",20,(r=>r?a():[,null]));export{A as access,f as binary,m as compile,e as cur,v as default,a as err,i as expr,l as id,r as idx,s as isId,o as lookup,u as nary,b as operator,h as operators,t as parse,n as skip,p as space,c as token,d as unary};

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "subscript",
-  "version": "7.6.2",
+  "version": "8.0.1",
   "description": "Fast and tiny expression evaluator with minimal syntax.",
   "main": "subscript.js",
   "module": "subscript.js",
@@ -8,15 +8,15 @@
   "types": "./subscript.d.ts",
   "exports": {
     ".": "./subscript.js",
-    "./parse.js": "./parse.js",
-    "./compile.js": "./compile.js",
+    "./parse.js": "./src/parse.js",
+    "./compile.js": "./src/compile.js",
     "./subscript.js": "./subscript.js",
     "./justin.js": "./justin.js"
   },
   "type": "module",
   "files": [
-    "parse.js",
-    "compile.js",
+    "src",
+    "feature",
     "subscript.js",
     "subscript.min.js",
     "justin.js",

package/src/compile.d.ts

@@ -0,0 +1,17 @@
+export type OperatorFunction = (...args: any[]) => any;
+export type OperatorMap = {
+  [key: string]: OperatorFunction;
+};
+export type Node = string | [string | undefined, ...Node[]];
+export function compile(node: Node): ((ctx?: any) => any) | OperatorFunction;
+export const operators: OperatorMap;
+export function operator(op: string, fn: OperatorFunction): void;
+
+type AccessorFunction = (ctx: any) => any;
+export function access(
+  a: [string, ...any[]] | string,
+  fn: Function,
+  generic: boolean
+): AccessorFunction;
+
+export default compile;

package/src/compile.js

@@ -0,0 +1,26 @@
+import { err } from "./parse.js"
+
+// build optimized evaluator for the tree
+export const compile = (node) => !Array.isArray(node) ? ctx => ctx?.[node] : !node[0] ? () => node[1] : operators[node[0]](...node.slice(1)),
+
+  // registered operators
+  operators = {},
+
+  // register an operator
+  operator = (op, fn, prev = operators[op]) => (operators[op] = (...args) => fn(...args) || prev && prev(...args)),
+
+  // takes node and returns evaluator depending on the case with passed params (container, path, ctx) =>
+  access = (a, fn, generic) => (
+    // (((x))) => x
+    a[0] === '()' ? access(a[1], fn, generic) :
+      // (_, name, ctx) => ctx[path]
+      typeof a === 'string' ? fn.bind(0, ctx => ctx, () => a) :
+        // (container, path, ctx) => container(ctx)[path]
+        a[0] === '.' ? fn.bind(0, compile(a[1]), (a = a[2], () => a)) :
+          // (container, path, ctx) => container(ctx)[path(ctx)]
+          a[0] === '[' ? fn.bind(0, compile(a[1]), compile(a[2])) :
+            // (src, _, ctx) => src(ctx)
+            generic ? (a = compile(a), fn.bind(0, ctx => [a(ctx)], () => 0)) : () => err('Bad left value')
+  )
+
+export default compile

package/src/const.js

@@ -0,0 +1,40 @@
+export const
+  PERIOD = 46,
+  OPAREN = 40,
+  CPAREN = 41,
+  OBRACK = 91,
+  CBRACK = 93,
+  OBRACE = 123,
+  CBRACE = 125,
+  SPACE = 32,
+  COLON = 58,
+  DQUOTE = 34,
+  QUOTE = 39,
+  _0 = 48,
+  _9 = 57,
+  _E = 69,
+  _e = 101,
+  BSLASH = 92,
+  SLASH = 47,
+  STAR = 42
+
+// ref: https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Operators/Operator_precedence
+export const
+  PREC_SEQ = 1,
+  PREC_ASSIGN = 2,
+  PREC_LOR = 3,
+  PREC_LAND = 4,
+  PREC_OR = 5,
+  PREC_XOR = 6,
+  PREC_AND = 7,
+  PREC_EQ = 8,
+  PREC_COMP = 9,
+  PREC_SHIFT = 10,
+  PREC_ADD = 11,
+  PREC_MULT = 12,
+  PREC_EXP = 13,
+  PREC_PREFIX = 14,
+  PREC_POSTFIX = 15,
+  PREC_ACCESS = 17,
+  PREC_GROUP = 18,
+  PREC_TOKEN = 20

package/src/parse.d.ts

@@ -0,0 +1,19 @@
+export let idx: any;
+export let cur: any;
+export function parse(s: string): any;
+export namespace parse {
+  function space(cc: any): any;
+  function id(n: any): any;
+}
+export function err(msg?: string, frag?: string): never;
+export function skip(is: number | ((c: number) => number)): string;
+export const lookup: ((a: any, b: any) => any)[];
+export function token(op: string, prec: number, map: (a: any, curPrec: number, from: number) => any): (a: any, curPrec: number, from?: any) => any;
+export function binary(op: string, prec: number, right?: boolean | undefined): (a: any, curPrec: number, from?: any) => any;
+export function unary(op: string, prec: number, post?: boolean | undefined): (a: any, curPrec: number, from?: any) => any;
+export function nary(op: string, prec: number, skips?: boolean | undefined): (a: any, curPrec: number, from?: any) => any;
+export function expr(prec: number, end?: string | undefined): any;
+export function isId(c: number): boolean;
+export function space(): number;
+export function id(): string;
+export default parse;

package/{parse.js → src/parse.js}

@@ -1,4 +1,4 @@
-const SPACE = 32
+import { SPACE } from "./const.js"
 
 // current string, index and collected ids
 export let idx, cur,
@@ -7,13 +7,12 @@ export let idx, cur,
   parse = s => (idx = 0, cur = s, s = expr(), cur[idx] ? err() : s || ''),
 
   err = (msg = 'Bad syntax',
-    frag = cur[idx],
     lines = cur.slice(0, idx).split('\n'),
     last = lines.pop()
   ) => {
     let before = cur.slice(idx - 108, idx).split('\n').pop()
-    let after = cur.slice(idx + 1, idx + 108).split('\n').shift()
-    throw EvalError(`${msg} at ${lines.length}:${last.length} \`${before + frag + after}\``, 'font-weight: bold')
+    let after = cur.slice(idx, idx + 108).split('\n').shift()
+    throw EvalError(`${msg} at ${lines.length}:${last.length} \`${idx >= 108 ? '…' : ''}${before}▶${after}\``, 'font-weight: bold')
   },
 
   skip = (is = 1, from = idx, l) => {
@@ -49,11 +48,12 @@ export let idx, cur,
     c == 36 || c == 95 || // $, _,
     (c >= 192 && c != 215 && c != 247), // any non-ASCII
 
+  // parse identifier (configurable)
+  id = parse.id = n => skip(isId),
+
   // skip space chars, return first non-space character
   space = parse.space = cc => { while ((cc = cur.charCodeAt(idx)) <= SPACE) idx++; return cc },
 
-  id = parse.id = n => skip(isId),
-
   // operator/token lookup table
   // lookup[0] is id parser to let configs redefine it
   lookup = [],

package/subscript.js

@@ -1,127 +1,22 @@
-import parse, { lookup, nary, binary, unary, token, skip, err, expr } from './parse.js'
-import compile, { operator } from './compile.js'
-
-const OPAREN = 40, CPAREN = 41, OBRACK = 91, CBRACK = 93, SPACE = 32, DQUOTE = 34, PERIOD = 46, _0 = 48, _9 = 57,
-  PREC_SEQ = 1, PREC_SOME = 4, PREC_EVERY = 5, PREC_OR = 6, PREC_XOR = 7, PREC_AND = 8,
-  PREC_EQ = 9, PREC_COMP = 10, PREC_SHIFT = 11, PREC_SUM = 12, PREC_MULT = 13, PREC_UNARY = 15, PREC_POSTFIX = 16, PREC_CALL = 18
-
-const subscript = s => (s = parse(s), ctx => (s.call ? s : (s = compile(s)))(ctx)),
-
-  // set any operator
-  // right assoc is indicated by negative precedence (meaning go from right to left)
-  set = (op, prec, fn) => (
-    !fn.length ? (
-      nary(op, Math.abs(prec), prec < 0),
-      operator(op, (...args) => (args = args.map(compile), ctx => fn(...args.map(arg => arg(ctx)))))
-    ) :
-      fn.length > 1 ? (
-        binary(op, Math.abs(prec), prec < 0),
-        operator(op,
-          (a, b) => b && (a = compile(a), b = compile(b), !a.length && !b.length ? (a = fn(a(), b()), () => a) : ctx => fn(a(ctx), b(ctx)))
-        )
-      ) :
-        (
-          unary(op, prec),
-          operator(op, (a, b) => !b && (a = compile(a), !a.length ? (a = fn(a()), () => a) : ctx => fn(a(ctx))))
-        )
-  ),
-
-  num = a => a ? err() : ['', (a = +skip(c => c === PERIOD || (c >= _0 && c <= _9) || (c === 69 || c === 101 ? 2 : 0))) != a ? err() : a],
-
-  // create increment-assign pair from fn
-  inc = (op, prec, fn, ev) => (
-    token(op, prec, a => a ? [op === '++' ? '-' : '+', [op, a], ['', 1]] : [op, expr(prec - 1)]), // ++a → [++, a], a++ → [-,[++,a],1]
-    operator(op, ev = (a, b) => (
-      a[0] === '(' ? ev(a[1]) : // ++(((a)))
-        a[0] === '.' ? (b = a[2], a = compile(a[1]), ctx => fn(a(ctx), b)) : // ++a.b
-          a[0] === '[' ? ([, a, b] = a, a = compile(a), b = compile(b), ctx => fn(a(ctx), b(ctx))) : // ++a[b]
-            (ctx => fn(ctx, a)) // ++a
-    ))
-  )
-
-// literals
-// null operator returns first value (needed for direct literals)
-operator('', v => () => v)
-
-// "a"
-lookup[DQUOTE] = (a) => (a ? err() : ['', (skip() + skip(c => c - DQUOTE ? 1 : 0) + (skip() || err('Bad string'))).slice(1, -1)])
-
-// .1
-lookup[PERIOD] = a => (!a && num())
-
-// 0-9
-for (let i = 0; i <= 9; i++) lookup[_0 + i] = num
-
-// sequences
-set(',', PREC_SEQ, (...args) => args[args.length - 1])
-set('||', PREC_SOME, (...args) => { let i = 0, v; for (; !v && i < args.length;) v = args[i++]; return v })
-set('&&', PREC_EVERY, (...args) => { let i = 0, v = true; for (; v && i < args.length;) v = args[i++]; return v })
-
-// assignment
-binary('=', 10, true)
-operator('=', (a, b) => {
-  let calc = compile(b), container, path,
-    set = typeof a === 'string' ? (ctx, v) => ctx[a] = v :
-      a[0] === '.' ? (container = compile(a[1]), path = a[2], (ctx, v) => container(ctx)[path] = v) :
-        a[0] === '[' ? (container = compile(a[1]), path = compile(a[2]), (ctx, v) => container(ctx)[path(ctx)] = v) :
-          err('Bad left value');
-  return ctx => set(ctx, calc(ctx))
-})
-
-// binaries
-set('+', PREC_SUM, (a, b) => a + b)
-set('-', PREC_SUM, (a, b) => a - b)
-set('*', PREC_MULT, (a, b) => a * b)
-set('/', PREC_MULT, (a, b) => a / b)
-set('%', PREC_MULT, (a, b) => a % b)
-set('|', PREC_OR, (a, b) => a | b)
-set('&', PREC_AND, (a, b) => a & b)
-set('^', PREC_XOR, (a, b) => a ^ b)
-set('==', PREC_EQ, (a, b) => a == b)
-set('!=', PREC_EQ, (a, b) => a != b)
-set('>', PREC_COMP, (a, b) => a > b)
-set('>=', PREC_COMP, (a, b) => a >= b)
-set('<', PREC_COMP, (a, b) => a < b)
-set('<=', PREC_COMP, (a, b) => a <= b)
-set('>>', PREC_SHIFT, (a, b) => a >> b)
-set('>>>', PREC_SHIFT, (a, b) => a >>> b)
-set('<<', PREC_SHIFT, (a, b) => a << b)
-
-// unaries
-set('+', PREC_UNARY, a => +a)
-set('-', PREC_UNARY, a => -a)
-set('!', PREC_UNARY, a => !a)
-
-// increments
-inc('++', PREC_UNARY, (a, b) => ++a[b])
-inc('--', PREC_UNARY, (a, b) => --a[b])
-
-// a[b]
-token('[', PREC_CALL, a => a && ['[', a, expr(0, CBRACK) || err()])
-operator('[', (a, b) => b && (a = compile(a), b = compile(b), ctx => a(ctx)[b(ctx)]))
-
-// a.b
-token('.', PREC_CALL, (a, b) => a && (b = expr(PREC_CALL)) && ['.', a, b])
-operator('.', (a, b) => (a = compile(a), b = !b[0] ? b[1] : b, ctx => a(ctx)[b])) // a.true, a.1 → needs to work fine
-
-// (a,b,c), (a)
-token('(', PREC_CALL, a => !a && ['(', expr(0, CPAREN) || err()])
-
-// a(b,c,d), a()
-token('(', PREC_CALL, (a, b) => a && (b = expr(0, CPAREN), b ? ['(', a, b] : ['(', a, '']))
-operator('(', (a, b, path, container, args) => b == null ? (compile(a, b)) : (
-  args = b == '' ? () => [] : // a()
-    b[0] === ',' ? (b = b.slice(1).map(compile), ctx => b.map(arg => arg(ctx))) : // a(b,c)
-      (b = compile(b), ctx => [b(ctx)]), // a(b)
-
-  a[0] === '.' ? (path = a[2], a = compile(a[1]), ctx => a(ctx)[path](...args(ctx))) : // a.b(...args)
-    a[0] === '[' ? (path = compile(a[2]), a = compile(a[1]), ctx => a(ctx)[path(ctx)](...args(ctx))) : // a[b](...args)
-      (a = compile(a), ctx => a(ctx)(...args(ctx))) // a(...args)
-)
-)
-
-
-export default subscript
-export { set }
-export * from './parse.js'
-export * from './compile.js'
+/**
+ * Subscript dialect includes common operators / primitives for all languages
+ */
+import './feature/number.js'
+import './feature/string.js'
+import './feature/call.js'
+import './feature/access.js'
+import './feature/group.js'
+import './feature/mult.js'
+import './feature/add.js'
+import './feature/increment.js'
+import './feature/bitwise.js'
+import './feature/compare.js'
+import './feature/logic.js'
+import './feature/assign.js'
+import compile from './src/compile.js'
+import parse from './src/parse.js'
+
+export * from './src/parse.js'
+export * from './src/compile.js'
+
+export default s => compile(parse(s))

package/subscript.min.js

@@ -1 +1 @@
-let e,t,l=l=>(e=0,t=l,l=n(),t[e]?r():l||""),r=(l="Bad syntax",r=t[e],a=t.slice(0,e).split("\n"),n=a.pop())=>{let s=t.slice(e-108,e).split("\n").pop(),h=t.slice(e+1,e+108).split("\n").shift();throw EvalError(`${l} at ${a.length}:${n.length} \`${s+r+h}\``,"font-weight: bold")},a=(l=1,r=e,a)=>{if("number"==typeof l)e+=l;else for(;a=l(t.charCodeAt(e));)e+=a;return t.slice(r,e)},n=(t=0,a,n,s,h,o)=>{for(;(n=l.space())&&(h=((o=p[n])&&o(s,t))??(!s&&l.id()));)s=h;return a&&(n==a?e++:r()),s},s=e=>e>=48&&e<=57||e>=65&&e<=90||e>=97&&e<=122||36==e||95==e||e>=192&&215!=e&&247!=e,h=l.space=l=>{for(;(l=t.charCodeAt(e))<=32;)e++;return l},o=l.id=e=>a(s),p=[],i=(l,r=32,a,n=l.charCodeAt(0),h=l.length,o=p[n],i=l.toUpperCase()!==l)=>p[n]=(n,p,c=e)=>p<r&&(h<2||t.substr(e,h)==l)&&(!i||!s(t.charCodeAt(e+h)))&&(e+=h,a(n,p))||(e=c,o?.(n,p)),c=(e,t,l=0)=>i(e,t,((r,a)=>r&&(a=n(t-l/2))&&[e,r,a])),g=(e,t,l)=>i(e,t,(r=>l?r&&[e,r]:!r&&(r=n(t-.5))&&[e,r])),f=(e,t,l)=>{i(e,t,((r,a)=>(r||l)&&((a=n(t))||l)&&((!r||r[0]!==e)&&(r=[e,r]),(a||l)&&r.push(a),r)))};const u=e=>Array.isArray(e)?d[e[0]](...e.slice(1)):t=>t?.[e],d={},A=(e,t,l=d[e])=>d[e]=(...e)=>t(...e)||l&&l(...e),b=e=>(e=l(e),t=>(e.call?e:e=u(e))(t)),m=(e,t,l)=>l.length?l.length>1?(c(e,Math.abs(t),t<0),A(e,((e,t)=>t&&(e=u(e),t=u(t),e.length||t.length?r=>l(e(r),t(r)):(e=l(e(),t()),()=>e))))):(g(e,t),A(e,((e,t)=>!t&&((e=u(e)).length?t=>l(e(t)):(e=l(e()),()=>e))))):(f(e,Math.abs(t),t<0),A(e,((...e)=>(e=e.map(u),t=>l(...e.map((e=>e(t)))))))),y=e=>e?r():["",(e=+a((e=>46===e||e>=48&&e<=57||(69===e||101===e?2:0))))!=e?r():e],C=(e,t,l,r)=>(i(e,t,(l=>l?["++"===e?"-":"+",[e,l],["",1]]:[e,n(t-1)])),A(e,r=(e,t)=>"("===e[0]?r(e[1]):"."===e[0]?(t=e[2],e=u(e[1]),r=>l(e(r),t)):"["===e[0]?([,e,t]=e,e=u(e),t=u(t),r=>l(e(r),t(r))):t=>l(t,e)));A("",(e=>()=>e)),p[34]=e=>e?r():["",(a()+a((e=>e-34?1:0))+(a()||r("Bad string"))).slice(1,-1)],p[46]=e=>!e&&y();for(let e=0;e<=9;e++)p[48+e]=y;m(",",1,((...e)=>e[e.length-1])),m("||",4,((...e)=>{let t,l=0;for(;!t&&l<e.length;)t=e[l++];return t})),m("&&",5,((...e)=>{let t=0,l=!0;for(;l&&t<e.length;)l=e[t++];return l})),c("=",10,!0),A("=",((e,t)=>{let l,a,n=u(t),s="string"==typeof e?(t,l)=>t[e]=l:"."===e[0]?(l=u(e[1]),a=e[2],(e,t)=>l(e)[a]=t):"["===e[0]?(l=u(e[1]),a=u(e[2]),(e,t)=>l(e)[a(e)]=t):r("Bad left value");return e=>s(e,n(e))})),m("+",12,((e,t)=>e+t)),m("-",12,((e,t)=>e-t)),m("*",13,((e,t)=>e*t)),m("/",13,((e,t)=>e/t)),m("%",13,((e,t)=>e%t)),m("|",6,((e,t)=>e|t)),m("&",8,((e,t)=>e&t)),m("^",7,((e,t)=>e^t)),m("==",9,((e,t)=>e==t)),m("!=",9,((e,t)=>e!=t)),m(">",10,((e,t)=>e>t)),m(">=",10,((e,t)=>e>=t)),m("<",10,((e,t)=>e<t)),m("<=",10,((e,t)=>e<=t)),m(">>",11,((e,t)=>e>>t)),m(">>>",11,((e,t)=>e>>>t)),m("<<",11,((e,t)=>e<<t)),m("+",15,(e=>+e)),m("-",15,(e=>-e)),m("!",15,(e=>!e)),C("++",15,((e,t)=>++e[t])),C("--",15,((e,t)=>--e[t])),i("[",18,(e=>e&&["[",e,n(0,93)||r()])),A("[",((e,t)=>t&&(e=u(e),t=u(t),l=>e(l)[t(l)]))),i(".",18,((e,t)=>e&&(t=n(18))&&[".",e,t])),A(".",((e,t)=>(e=u(e),t=t[0]?t:t[1],l=>e(l)[t]))),i("(",18,(e=>!e&&["(",n(0,41)||r()])),i("(",18,((e,t)=>e&&((t=n(0,41))?["(",e,t]:["(",e,""]))),A("(",((e,t,l,r,a)=>null==t?u(e):(a=""==t?()=>[]:","===t[0]?(t=t.slice(1).map(u),e=>t.map((t=>t(e)))):(t=u(t),e=>[t(e)]),"."===e[0]?(l=e[2],e=u(e[1]),t=>e(t)[l](...a(t))):"["===e[0]?(l=u(e[2]),e=u(e[1]),t=>e(t)[l(t)](...a(t))):(e=u(e),t=>e(t)(...a(t))))));export{c as binary,u as compile,t as cur,b as default,r as err,n as expr,o as id,e as idx,s as isId,p as lookup,f as nary,A as operator,d as operators,l as parse,m as set,a as skip,h as space,i as token,g as unary};
+let t,r,e=e=>(t=0,r=e,e=s(),r[t]?n():e||""),n=(e="Bad syntax",n=r.slice(0,t).split("\n"),o=n.pop())=>{let s=r.slice(t-108,t).split("\n").pop(),a=r.slice(t,t+108).split("\n").shift();throw EvalError(`${e} at ${n.length}:${o.length} \`${t>=108?"…":""}${s}▶${a}\``,"font-weight: bold")},o=(e=1,n=t,o)=>{if("number"==typeof e)t+=e;else for(;o=e(r.charCodeAt(t));)t+=o;return r.slice(n,t)},s=(r=0,o,s,a,p,i)=>{for(;(s=e.space())&&(p=((i=l[s])&&i(a,r))??(!a&&e.id()));)a=p;return o&&(s==o?t++:n()),a},a=t=>t>=48&&t<=57||t>=65&&t<=90||t>=97&&t<=122||36==t||95==t||t>=192&&215!=t&&247!=t,p=e.id=t=>o(a),i=e.space=e=>{for(;(e=r.charCodeAt(t))<=32;)t++;return e},l=[],f=(e,n=32,o,s=e.charCodeAt(0),p=e.length,i=l[s],f=e.toUpperCase()!==e)=>l[s]=(s,l,c=t)=>l<n&&(p<2||r.substr(t,p)==e)&&(!f||!a(r.charCodeAt(t+p)))&&(t+=p,o(s,l))||(t=c,i?.(s,l)),c=(t,r,e=0)=>f(t,r,((n,o)=>n&&(o=s(r-e/2))&&[t,n,o])),d=(t,r,e)=>f(t,r,(n=>e?n&&[t,n]:!n&&(n=s(r-.5))&&[t,n])),u=(t,r,e)=>{f(t,r,((n,o)=>(n||e)&&((o=s(r))||e)&&((!n||n[0]!==t)&&(n=[t,n]),(o||e)&&n.push(o),n)))};const h=t=>t?n():[,(t=+o((t=>46===t||t>=48&&t<=57||(69===t||101===t?2:0))))!=t?n():t];l[46]=t=>!t&&h();for(let t=48;t<=57;t++)l[t]=h;const b={n:"\n",r:"\r",t:"\t",b:"\b",f:"\f",v:"\v"},g=e=>(s,a,p="")=>{for(s&&n("Unexpected string"),o();(a=r.charCodeAt(t))-e;)92===a?(o(),a=o(),p+=b[a]||a):p+=o();return o()||n("Bad string"),[,p]};l[34]=g(34),l[39]=g(39);const m=t=>Array.isArray(t)?t[0]?A[t[0]](...t.slice(1)):()=>t[1]:r=>r?.[t],A={},y=(t,r,e=A[t])=>A[t]=(...t)=>r(...t)||e&&e(...t),C=(t,r,e)=>"()"===t[0]?C(t[1],r,e):"string"==typeof t?r.bind(0,(t=>t),(()=>t)):"."===t[0]?r.bind(0,m(t[1]),(t=t[2],()=>t)):"["===t[0]?r.bind(0,m(t[1]),m(t[2])):e?(t=m(t),r.bind(0,(r=>[t(r)]),(()=>0))):()=>n("Bad left value");f("(",17,((t,r)=>t&&((r=s(0,41))?["(",t,r]:["(",t,""]))),y("(",((t,r,e)=>(e=""==r?()=>[]:","===r[0]?(r=r.slice(1).map(m),t=>r.map((r=>r(t)))):(r=m(r),t=>[r(t)]),C(t,((t,r,n)=>t(n)[r(n)](...e(n))),!0)))),f("[",17,(t=>t&&["[",t,s(0,93)||n()])),y("[",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)[r(e)]))),f(".",17,((t,r)=>t&&(r=s(17))&&[".",t,r])),y(".",((t,r)=>(t=m(t),r=r[0]?r:r[1],e=>t(e)[r]))),f("(",17,(t=>!t&&["()",s(0,41)||n("Empty group")])),y("()",(t=>m(t)));const $=(...t)=>(t=t.map(m),r=>t.map((t=>t(r))).pop());u(",",1),y(",",$),u(";",1,!0),y(";",$),c("*",12),y("*",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)*r(e)))),c("/",12),y("/",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)/r(e)))),c("%",12),y("%",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)%r(e)))),c("*=",2,!0),y("*=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]*=r(n)))))),c("/=",2,!0),y("/=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]/=r(n)))))),c("%=",2,!0),y("%=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]%=r(n)))))),d("+",14),y("+",((t,r)=>!r&&(t=m(t),r=>+t(r)))),d("-",14),y("-",((t,r)=>!r&&(t=m(t),r=>-t(r)))),c("+",11),y("+",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)+r(e)))),c("-",11),y("-",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)-r(e)))),c("+=",2,!0),y("+=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]+=r(n)))))),c("-=",2,!0),y("-=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]-=r(n)))))),f("++",15,(t=>t?["-",["++",t],[,1]]:["++",s(14)])),y("++",(t=>C(t,((t,r,e)=>++t(e)[r(e)])))),f("--",15,(t=>t?["+",["--",t],[,1]]:["--",s(14)])),y("--",(t=>C(t,((t,r,e)=>--t(e)[r(e)])))),d("~",14),y("~",((t,r)=>!r&&(t=m(t),r=>~t(r)))),c("|",5),y("|",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)|r(e)))),c("&",7),y("&",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)&r(e)))),c("^",6),y("^",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)^r(e)))),c(">>",10),y(">>",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)>>r(e)))),c("<<",10),y("<<",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)<<r(e)))),c("==",8),y("==",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)==r(e)))),c("!=",8),y("!=",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)!=r(e)))),c(">",8),y(">",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)>r(e)))),c("<",8),y("<",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)<r(e)))),c(">=",8),y(">=",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)>=r(e)))),c("<=",8),y("<=",((t,r)=>r&&(t=m(t),r=m(r),e=>t(e)<=r(e)))),d("!",14),y("!",((t,r)=>!r&&(t=m(t),r=>!t(r)))),u("||",3),y("||",((...t)=>(t=t.map(m),r=>{let e,n;for(e of t)if(n=e(r))return n;return n}))),u("&&",4),y("&&",((...t)=>(t=t.map(m),r=>{let e,n;for(e of t)if(!(n=e(r)))return n;return n}))),c("=",2,!0),y("=",((t,r)=>(r=m(r),C(t,((t,e,n)=>t(n)[e(n)]=r(n))))));var v=t=>m(e(t));export{C as access,c as binary,m as compile,r as cur,v as default,n as err,s as expr,p as id,t as idx,a as isId,l as lookup,u as nary,y as operator,A as operators,e as parse,o as skip,i as space,f as token,d as unary};

package/compile.js

@@ -1,8 +0,0 @@
-// build optimized evaluator for the tree
-export const compile = (node) => !Array.isArray(node) ? ctx => ctx?.[node] : operators[node[0]](...node.slice(1)),
-
-  operators = {},
-
-  operator = (op, fn, prev = operators[op]) => (operators[op] = (...args) => fn(...args) || prev && prev(...args))
-
-export default compile