mevento 3.0.3 → 4.0.0

package/README.md

@@ -0,0 +1,207 @@
+# MEvento TypeScript
+
+MEvento is a tiny single-file scripting VM for host applications. The host keeps
+control of native behavior by exposing functions, while scripts stored in a
+database or loaded at runtime can compose those functions without rebuilding the
+host app.
+
+This module is the TypeScript implementation. It provides synchronous
+`MEvento` and async `MEventoAsync` runtimes.
+
+## v2 Status
+
+v2 is a superset of v1 script syntax, with stricter diagnostics and new
+runtime helpers. Existing v1 scripts should still parse and execute in v2.
+
+By default, v2 is stricter: unknown host functions raise `unknown_function`
+instead of silently returning `null`. For existing database scripts that depend
+on the v1 behavior, run the VM with `{ compatV1: true }`. In that mode, missing
+host functions return `null` and instance validation does not report them as
+unknown. New scripts should prefer strict mode and wrap risky calls in `_try_`
+when a script should continue after failure.
+
+v2 additions include:
+
+- Dot property access: `user.name` is equivalent to `user['name']`.
+- `_try_` result capture and helper functions.
+- Function specs with arity, argument type hints, tags, and return type hints.
+- Script manifest validation for required host functions, inputs, and outputs.
+- Trace mode and execution step budgets.
+- v1 compatibility mode for existing scripts that call optional host functions.
+- Minimal collection built-ins for arrays and maps.
+
+## Script Syntax
+
+MEvento is intentionally small and C-like. It has no user-defined functions and
+no classes. The host application owns the real logic.
+
+Supported syntax includes assignments, expressions, host calls, object and
+array literals, bracket and dot access, `if`, `while`, numeric `for`,
+`for ... in`, `break`, `continue`, `return`, `??`, comments, and multilingual
+keyword dictionaries.
+
+Example:
+
+```js
+user = loadUser()
+name = user.profile.name ?? 'anonymous'
+
+items = []
+_push_(items, name)
+
+if (_len_(items) > 0) {
+    log(items[0])
+}
+```
+
+## Built-In Functions
+
+Result helpers:
+
+```text
+_try_(expression)        # returns {ok, value, error}; evaluates lazily
+_ok_(result)
+_err_(result)
+_value_(result, fallback)
+_error_(result)
+_code_(result)
+_message_(result)
+_unwrap_(result)
+```
+
+Collection helpers:
+
+```text
+_len_(array|object|string)
+_push_(array, value)        # mutates array, returns array
+_pop_(array)                # mutates array, returns removed value or null
+_insert_(array, index, value)
+_remove_at_(array, index)   # mutates array, returns removed value or null
+_has_(object, key)
+_keys_(object)
+_values_(object)
+```
+
+Invalid built-in argument types raise `invalid_argument_type` and can be
+captured with `_try_`.
+
+## Usage
+
+Register global functions:
+
+```ts
+import { MEvento } from "mevento";
+
+MEvento.register("log", (args) => {
+  console.log(...args);
+  return null;
+});
+
+MEvento.register("add", (args) => Number(args[0]) + Number(args[1]), {
+  name: "add",
+  minArgs: 2,
+  maxArgs: 2,
+  args: [
+    { name: "left", type: "number" },
+    { name: "right", type: "number" },
+  ],
+  returnType: "number",
+});
+
+const value = MEvento.run("add(12, 23)");
+```
+
+Use one VM instance:
+
+```ts
+import { MEvento } from "mevento";
+
+const vm = MEvento.newInstance();
+
+vm.registerFunction("loadUser", () => ({ profile: { name: "Awa" } }), {
+  name: "loadUser",
+  maxArgs: 0,
+  returnType: "object",
+});
+
+const result = vm.execute("loadUser().profile.name");
+```
+
+Use async host functions:
+
+```ts
+import { MEventoAsync } from "mevento";
+
+const vm = MEventoAsync.newInstance();
+
+vm.registerFunction("fetchUser", async () => ({ name: "Awa" }), {
+  name: "fetchUser",
+  maxArgs: 0,
+  returnType: "object",
+});
+
+const name = await vm.execute("fetchUser().name");
+```
+
+Inject host input for one run:
+
+```ts
+const total = MEvento.run("base + bonus", false, {
+  base: 12,
+  bonus: 23,
+});
+```
+
+## Validation And Manifests
+
+Function specs drive preflight validation and runtime argument checks:
+
+```ts
+const validation = vm.validate("add(12)");
+if (!validation.ok) {
+  console.log(validation.errors);
+}
+```
+
+Manifest validation checks required functions, inputs, and outputs:
+
+```ts
+const manifest = {
+  functions: {
+    add: { name: "add", minArgs: 2, maxArgs: 2, returnType: "number" },
+  },
+  inputs: [{ name: "base", type: "number" }],
+  outputs: [{ name: "result", type: "number" }],
+};
+
+const checked = MEvento.validateManifestSource(
+  "result = add(base, 2)",
+  manifest,
+);
+```
+
+## Options: Compatibility, Trace And Budgets
+
+Use options to enable v1 compatibility for existing scripts, cap execution
+steps, or collect a lightweight trace:
+
+```ts
+const legacyVm = MEvento.newInstance({ compatV1: true });
+legacyVm.execute("optionalHostFunction()"); // returns null when missing
+
+const vm = MEvento.newInstance({ maxSteps: 1000, trace: true });
+vm.execute("log('ok')");
+
+const trace = vm.trace();
+```
+
+## Development
+
+```bash
+npm install
+npm run build
+npm run test:conformance
+```
+
+The package currently uses a custom conformance command. Do not use `npm test`
+unless package metadata is updated.

package/dist/cjs/index.d.ts

@@ -45,6 +45,7 @@ declare class TokenType {
     static CONTINUE: number;
     static nullity: number;
     static RETURN: number;
+    static dot: number;
 }
 declare class Token {
     type: number;
@@ -73,6 +74,90 @@ declare abstract class AST {
     constructor(line?: number, col?: number);
     dump(): string;
 }
+declare class MEventoRuntimeError extends Error {
+    line?: number;
+    col?: number;
+    nodeType?: string;
+    cause?: unknown;
+    detail: string;
+    code: string;
+    diagnosticName?: string;
+    argCount?: number;
+    minArgs?: number;
+    maxArgs?: number;
+    argIndex?: number;
+    expectedType?: string;
+    actualType?: string;
+    stepCount?: number;
+    maxSteps?: number;
+    constructor(detail: string, line?: number, col?: number, nodeType?: string, cause?: unknown, diagnostic?: Partial<Omit<MEventoDiagnostic, "message" | "line" | "col" | "node">>);
+    static fromNode(node: AST, error: unknown): MEventoRuntimeError;
+    private static format;
+    diagnostic(): MEventoDiagnostic;
+}
+type MEventoDiagnostic = {
+    code: string;
+    message: string;
+    name?: string;
+    line?: number;
+    col?: number;
+    node?: string;
+    argCount?: number;
+    minArgs?: number;
+    maxArgs?: number;
+    argIndex?: number;
+    expectedType?: string;
+    actualType?: string;
+    stepCount?: number;
+    maxSteps?: number;
+};
+type MEventoValidationError = MEventoDiagnostic;
+type MEventoValidationResult = {
+    ok: boolean;
+    errors: MEventoValidationError[];
+};
+type MEventoFunctionSpec = {
+    name: string;
+    minArgs?: number;
+    maxArgs?: number;
+    tags?: Iterable<string>;
+    args?: MEventoArgSpec[];
+    returnType?: string;
+};
+type MEventoArgSpec = {
+    name: string;
+    type?: string;
+    required?: boolean;
+};
+type MEventoOptions = {
+    maxSteps?: number;
+    trace?: boolean;
+    compatV1?: boolean;
+};
+type MEventoValueSpec = {
+    name: string;
+    type?: string;
+    required?: boolean;
+};
+type MEventoScriptManifest = {
+    functions?: MEventoFunctionList;
+    inputs?: MEventoValueSpec[];
+    outputs?: MEventoValueSpec[];
+};
+type MEventoTraceEvent = {
+    kind: string;
+    line?: number;
+    col?: number;
+    node?: string;
+    name?: string;
+    stepCount?: number;
+    detail: {
+        [name: string]: unknown;
+    };
+};
+type MEventoFunctionList = Set<string> | string[] | MEventoFunctionSpec[] | {
+    [name: string]: MEventoFunctionSpec;
+};
 declare class RootAST extends AST {
     body: AST[];
     source: string;
@@ -220,6 +305,7 @@ declare abstract class ANodeVisitor {
 declare abstract class NodeVisitor extends ANodeVisitor {
     constructor();
     visit(node: AST): any;
+    protected beforeVisit(_node: AST): void;
     protected assignProperty(owner: any, property: any, value: any): any;
     protected abstract visitRootAST(node: RootAST): any;
     protected abstract visitBlockStatementAST(node: BlockStatementAST): any;
@@ -261,17 +347,43 @@ declare class MEvento extends NodeVisitor {
     protected currentScope?: MEventScope;
     debug: boolean;
     private static _globalFunctionsRegistry;
+    private static _globalFunctionSpecs;
     private static _cache;
     protected _functionsRegistry: {
         [k: string]: MEventoFBinding;
     };
+    protected _functionSpecs: {
+        [k: string]: MEventoFunctionSpec;
+    };
     protected _functionResolver?: (name: string) => MEventoFBinding | undefined;
-    constructor();
+    protected _options: MEventoOptions;
+    private _executionStepCount;
+    private _traceEvents;
+    constructor(options?: MEventoOptions);
+    get options(): MEventoOptions;
+    get executionStepCount(): number;
+    trace(): MEventoTraceEvent[];
+    protected resetExecutionBudget(): void;
+    protected beforeVisit(node: AST): void;
+    protected clearTrace(): void;
+    protected recordTrace(kind: string, node: AST, name?: string, detail?: {
+        [name: string]: unknown;
+    }): void;
     protected resolve(name: string): any;
     protected changeVariable(name: string, value: any): any;
     protected pushScope(name: string): void;
     protected popScope(): void;
     protected log(message: any): void;
+    protected successResult(value: any): {
+        ok: boolean;
+        value: any;
+        error: any;
+    };
+    protected errorResult(error: MEventoRuntimeError): {
+        ok: boolean;
+        value: any;
+        error: MEventoDiagnostic;
+    };
     protected visitRootAST(node: RootAST): any;
     protected visitBlockStatementAST(node: BlockStatementAST): any;
     protected visitIdentifierAST(node: IdentifierAST): any;
@@ -297,23 +409,54 @@ declare class MEvento extends NodeVisitor {
     resolveArguments(args: AST[]): any;
     setFunctionResolver(resolver: (name: string) => MEventoFBinding | undefined): void;
     resolveFunction(name: string): MEventoFBinding | undefined;
-    registerFunction(id: string, fn: MEventoFBinding): void;
+    resolveFunctionSpec(name: string): MEventoFunctionSpec | undefined;
+    capabilities(): {
+        [name: string]: MEventoFunctionSpec;
+    };
+    registerFunction(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     unregisterFunction(id: string): void;
+    validate(source: string, functions?: MEventoFunctionList, cache?: boolean): MEventoValidationResult;
+    validateManifest(source: string, manifest: MEventoScriptManifest, cache?: boolean): MEventoValidationResult;
+    protected validationFunctionSpecs(functions?: MEventoFunctionList): Map<string, MEventoFunctionSpec>;
+    protected validateNode(node: AST | null | undefined, knownFunctions: Map<string, MEventoFunctionSpec>, errors: MEventoValidationError[], protectedByTry?: boolean): void;
+    protected validateCallExpression(node: CallExpressionAST, knownFunctions: Map<string, MEventoFunctionSpec>, errors: MEventoValidationError[], protectedByTry: boolean): void;
+    protected validateStaticArgumentTypes(node: CallExpressionAST, spec: MEventoFunctionSpec, errors: MEventoValidationError[]): void;
+    protected staticArgumentType(node: AST): string | undefined;
+    protected argumentTypeMatches(spec: MEventoArgSpec, actualType: string): boolean;
+    protected validateManifestNode(module: AST, manifest: MEventoScriptManifest, errors: MEventoValidationError[]): void;
+    protected analyzeManifestNode(node: AST | null | undefined, analysis: {
+        knownInputs: Set<string>;
+        assigned: Set<string>;
+        assignedTypes: Map<string, string>;
+        reportedInputs: Set<string>;
+    }, errors: MEventoValidationError[]): void;
+    protected markAssignedTarget(node: AST, assignedType: string | undefined, analysis: {
+        assigned: Set<string>;
+        assignedTypes: Map<string, string>;
+    }): void;
+    protected valueSpecTypeMatches(spec: MEventoValueSpec, actualType: string): boolean;
+    protected validationError(code: string, node: AST, message: string, name?: string, diagnostic?: Pick<MEventoDiagnostic, "argCount" | "minArgs" | "maxArgs" | "argIndex" | "expectedType" | "actualType">): MEventoValidationError;
+    protected validateRuntimeArgumentTypes(node: AST, spec: MEventoFunctionSpec, values: unknown[]): void;
     execute(source: string, cache?: boolean, input?: {
         [k: string]: any;
     }): any;
     static compile(source: string, cache?: boolean): AST;
-    static register(id: string, fn: MEventoFBinding): void;
+    static register(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     static unregister(id: string): void;
+    static capabilities(): {
+        [name: string]: MEventoFunctionSpec;
+    };
+    static validateSource(source: string, functions: MEventoFunctionList, cache?: boolean): MEventoValidationResult;
+    static validateManifestSource(source: string, manifest: MEventoScriptManifest, cache?: boolean): MEventoValidationResult;
     static run(source: string, cache?: boolean, input?: {
         [k: string]: any;
-    }): any;
-    static newInstance(): MEvento;
+    }, options?: MEventoOptions): any;
+    static newInstance(options?: MEventoOptions): MEvento;
     clone(): MEvento;
     newAsyncInstance(): MEventoAsync;
 }
 declare class MEventoAsync extends MEvento {
-    constructor();
+    constructor(options?: MEventoOptions);
     protected visitRootAST(node: RootAST): Promise<any>;
     protected visitBlockStatementAST(node: BlockStatementAST): Promise<any>;
     protected visitIdentifierAST(node: AST): Promise<any>;
@@ -334,16 +477,16 @@ declare class MEventoAsync extends MEvento {
     protected visitForOfStatement(node: ForOfStatement): Promise<any[] | ReturnBranch>;
     protected visitReturnAST(node: ReturnAST): Promise<any>;
     resolveArgumentsAsync(args: AST[]): Promise<any[]>;
-    registerFunction(id: string, fn: MEventoFBinding): void;
+    registerFunction(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     unregisterFunction(id: string): void;
     execute(source: string, cache?: boolean, input?: {
         [k: string]: any;
     }): Promise<any>;
     static run(source: string, cache?: boolean, input?: {
         [k: string]: any;
-    }): Promise<any>;
-    static newInstance(): MEventoAsync;
+    }, options?: MEventoOptions): Promise<any>;
+    static newInstance(options?: MEventoOptions): MEventoAsync;
     clone(): MEventoAsync;
 }
 
-export { AST, ArrayExpression, AssignmentExpressionAST, BinaryExpressionAST, BlockStatementAST, BreakAST, BreakBranch, CallExpressionAST, ContinueAST, ContinueBranch, ExpressionStatementAST, ForLoopStatement, ForOfStatement, IdentifierAST, IfStatementAST, IndexAccessorAST, LexerDictionary, LiteralAST, LogicalExpressionAST, LoopControl, MEventScope, MEvento, MEventoAsync, type MEventoFBinding, NodeVisitor, ObjectExpression, ObjectProperty, ReturnAST, ReturnBranch, RootAST, Token, TokenType, TupleExpression, UnaryExpressionAST, WhileLoopStatement };
+export { AST, ArrayExpression, AssignmentExpressionAST, BinaryExpressionAST, BlockStatementAST, BreakAST, BreakBranch, CallExpressionAST, ContinueAST, ContinueBranch, ExpressionStatementAST, ForLoopStatement, ForOfStatement, IdentifierAST, IfStatementAST, IndexAccessorAST, LexerDictionary, LiteralAST, LogicalExpressionAST, LoopControl, MEventScope, MEvento, type MEventoArgSpec, MEventoAsync, type MEventoDiagnostic, type MEventoFBinding, type MEventoFunctionList, type MEventoFunctionSpec, type MEventoOptions, MEventoRuntimeError, type MEventoScriptManifest, type MEventoTraceEvent, type MEventoValidationError, type MEventoValidationResult, type MEventoValueSpec, NodeVisitor, ObjectExpression, ObjectProperty, ReturnAST, ReturnBranch, RootAST, Token, TokenType, TupleExpression, UnaryExpressionAST, WhileLoopStatement };

package/dist/cjs/index.js

@@ -1,8 +1,8 @@
-var Y=Object.defineProperty;var it=Object.getOwnPropertyDescriptor;var st=Object.getOwnPropertyNames;var nt=Object.prototype.hasOwnProperty;var ot=(c,t)=>{for(var e in t)Y(c,e,{get:t[e],enumerable:!0})},at=(c,t,e,i)=>{if(t&&typeof t=="object"||typeof t=="function")for(let s of st(t))!nt.call(c,s)&&s!==e&&Y(c,s,{get:()=>t[s],enumerable:!(i=it(t,s))||i.enumerable});return c};var ct=c=>at(Y({},"__esModule",{value:!0}),c);var lt={};ot(lt,{AST:()=>d,ArrayExpression:()=>N,AssignmentExpressionAST:()=>E,BinaryExpressionAST:()=>V,BlockStatementAST:()=>I,BreakAST:()=>H,BreakBranch:()=>A,CallExpressionAST:()=>R,ContinueAST:()=>z,ContinueBranch:()=>w,ExpressionStatementAST:()=>X,ForLoopStatement:()=>M,ForOfStatement:()=>W,IdentifierAST:()=>g,IfStatementAST:()=>B,IndexAccessorAST:()=>T,LexerDictionary:()=>L,LiteralAST:()=>m,LogicalExpressionAST:()=>P,LoopControl:()=>C,MEventScope:()=>Q,MEvento:()=>O,MEventoAsync:()=>J,NodeVisitor:()=>G,ObjectExpression:()=>j,ObjectProperty:()=>k,ReturnAST:()=>K,ReturnBranch:()=>f,RootAST:()=>F,Token:()=>h,TokenType:()=>r,TupleExpression:()=>D,UnaryExpressionAST:()=>q,WhileLoopStatement:()=>U});module.exports=ct(lt);function b(c,t){let e=`Invalid token ${c.type}[${c.value}] at ${c.line}, ${c.col} ${t?`: expecting ${t} token`:""}
-`;throw Error(e)}function l(c){return typeof c=="number"}function ut(c){return typeof c=="boolean"}function x(c){return typeof c=="string"}function v(c){return!(c===null||l(c)&&c===0||x(c)&&c.length===0||ut(c)&&!c)}function ht(c){let t=0,e=0,i;if(c.length===0)return t;for(e=0;e<c.length;e++)i=c.charCodeAt(e),t=(t<<5)-t+i,t|=0;return t}var r=class{};r.id=0,r.comma=1,r.semi=2,r.numberConst=3,r.stringConst=4,r.equal=5,r.lparen=6,r.rparen=7,r.eol=8,r.eof=9,r.lbrace=10,r.rbrace=11,r.lbracket=12,r.rbracket=13,r.great=14,r.greatEq=15,r.less=16,r.lessEq=17,r.eqeq=18,r.IF=19,r.ELSE=20,r.TRUE=21,r.FALSE=22,r.NULL=23,r.not=24,r.notEq=25,r.and=26,r.or=27,r.plus=28,r.minus=29,r.div=30,r.mult=31,r.mod=32,r.invalid=33,r.colon=34,r.WHILE_TILL=35,r.FOR_LOOP=36,r.up=37,r.down=38,r.with=39,r.in=40,r.TILL=41,r.BREAK=42,r.CONTINUE=43,r.nullity=44,r.RETURN=45;var h=class c{constructor(t,e,i=1,s=1){this.type=t,this.value=e,this.line=i,this.col=s}static from(t,e){return new c(t,e)}toString(){return`[${this.type.toString()}, ${this.value}]`}},u=class{};u.equal=61,u.comma=44,u.semiColon=59,u.lparen=40,u.rparen=41,u.backslash=92,u.quote=34,u.squote=39,u.plus=43,u.minus=45,u.star=42,u.slash=47,u.percent=37,u.lbrace=123,u.rbrace=125,u.lbracket=91,u.rbracket=93,u.not=33,u.great=62,u.less=60,u.and=38,u.pipe=124,u.colon=58,u.questionMark=63,u.shebang=35;var L=class{constructor(t,e){this.keywords={};this.keywords={...e},this.lang=t}},y=class y{constructor(t){this._position=0;this._line=1;this._col=1;this._currentChar=-1;this._source=t,this._currentChar=this._source[this._position].charCodeAt(0),this._resolveLanguage()}get source(){return this._source}_resolveLanguage(){var e;let t=this.nextToken();if(t.type===r.less){let i=this.nextToken();i.type!==r.id&&b(t);let s=i.value.toString();this._language=(e=y.languages.find(n=>n.lang===s))!=null?e:y._defaultLanguage,t=this.nextToken(),t.type!==r.great&&b(t)}else this._language=y._defaultLanguage,this._position=0,this._currentChar=this._source[this._position].charCodeAt(0)}_advance(){if(this._position++,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col++}_jump(t){if(this._position+=t,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col+=t}_pick(){return this._position+1>=this._source.length?-1:this._source[this._position+1].charCodeAt(0)}_isId(t){return t<48?t===36:t<58?!0:t<65?!1:t<91?!0:t<97?t===95:t<123}_isIdStart(t){return t<65?t===36:t<91?!0:t<97?t===95:t<123}_id(){var o,a;let t="",e=this._col,i=this._position,s=this._line;for(;this._isId(this._currentChar);)t+=String.fromCharCode(this._currentChar),this._advance();let n=this._language&&(o=this._language.keywords[t])!=null?o:t;return(a=y.RESERVED[n])!=null?a:new h(r.id,t,s,e)}_isLineEnd(t){return t===10||t===13||[`
-`,"\r","\u2028","\u2029"].includes(String.fromCharCode(t))}_isWhiteSpace(t){return[" ","	"].includes(String.fromCharCode(t))}_isDigit(t){return t>0&&(t^48)<=9}_skipWhiteSpace(){for(;this._isWhiteSpace(this._currentChar)===!0;)this._advance()}_number(){let t="",e=this._col,i=this._position,s=this._line,n=String.fromCharCode(this._currentChar);this._advance();let o=String.fromCharCode(this._currentChar),a=10;if(n==="0"&&["b","B","x","X","o","O"].includes(o))switch(this._advance(),o.toLowerCase()){case"b":a=2;break;case"o":a=8;break;case"x":a=16;break;default:a=10}else t+=n,a=10;for(;this._isDigit(this._currentChar)||a===16&&["A","a","B","b","C","c","D","d","E","e","F","f"].includes(String.fromCharCode(this._currentChar));)t+=String.fromCharCode(this._currentChar),this._advance();if(String.fromCharCode(this._currentChar)==="."&&this._isDigit(this._pick())===!0){for(a!==10&&b(new h(r.id,o,s,i)),t+=String.fromCharCode(this._currentChar),this._advance();this._isDigit(this._currentChar);)t+=String.fromCharCode(this._currentChar),this._advance();return new h(r.numberConst,parseFloat(t),s,e)}return new h(r.numberConst,parseInt(t,a),s,e)}_literalString(t){let e="",i=-1,s=this._position,n=this._col,o=this._line;for(;this._currentChar!==-1;){let a=String.fromCharCode(this._pick());if(this._currentChar==u.backslash){switch(a){case"\\":e+="\\";break;case"0":e+="\0";break;case"a":e+="a";break;case"b":e+="\b";break;case"f":e+="\f";break;case"n":e+=`
-`;break;case"r":e+="\r";break;case"t":e+="	";break;case"u":e+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+6),16)),this._jump(4);break;case"v":e+="\v";break;case"x":e+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+4),16)),this._jump(2);break;default:if(String.fromCharCode(t)==a)e+=String.fromCharCode(t);else{this._advance(),i=this._currentChar,e+=String.fromCharCode(this._currentChar),this._advance();continue}}this._jump(2),i=this._currentChar;continue}if(this._currentChar===t&&i!==u.backslash)break;e+=String.fromCharCode(this._currentChar),i=this._currentChar,this._advance()}return new h(r.stringConst,e,o,n)}_skipLineComment(){for(;!this._isLineEnd(this._currentChar)&&this._currentChar!=-1;)this._advance()}_skipComment(){for(;this._currentChar!==-1;){if(this._currentChar===u.star&&this._pick()===u.shebang){this._advance(),this._advance();break}this._advance()}}nextToken(){let t=this._line,e=this._col,i=this._position;for(;this._currentChar!==-1;){if(this._isLineEnd(this._currentChar))return this._line++,this._col=1,this._advance(),new h(r.eol,`
-`,t,e);if(this._isWhiteSpace(this._currentChar)){this._skipWhiteSpace();continue}if(this._currentChar==u.shebang){this._advance(),this._currentChar===u.star?(this._advance(),this._skipComment()):this._skipLineComment();continue}if(this._isDigit(this._currentChar))return this._number();if(this._isIdStart(this._currentChar))return this._id();if(this._currentChar===u.equal)return this._advance(),this._currentChar===u.equal?(this._advance(),new h(r.eqeq,"==",t,e)):new h(r.equal,"=",t,e);if(this._currentChar===u.great)return this._advance(),this._currentChar===u.equal?(this._advance(),new h(r.greatEq,">=",t,e)):new h(r.great,">",t,e);if(this._currentChar===u.less)return this._advance(),this._currentChar===u.equal?(this._advance(),new h(r.lessEq,"<=",t,e)):new h(r.less,"<",t,e);if(this._currentChar===u.semiColon)return this._advance(),new h(r.semi,";",t,e);if(this._currentChar===u.lparen)return this._advance(),new h(r.lparen,"(",t,e);if(this._currentChar===u.rparen)return this._advance(),new h(r.rparen,")",t,e);if(this._currentChar===u.comma)return this._advance(),new h(r.comma,",",t,e);if(this._currentChar===u.lbrace)return this._advance(),new h(r.lbrace,"{",t,e);if(this._currentChar===u.rbrace)return this._advance(),new h(r.rbrace,"}",t,e);if(this._currentChar===u.lbracket)return this._advance(),new h(r.lbracket,"[",t,e);if(this._currentChar===u.rbracket)return this._advance(),new h(r.rbracket,"]",t,e);if(this._currentChar===u.plus)return this._advance(),new h(r.plus,"+",t,e);if(this._currentChar===u.minus)return this._advance(),new h(r.minus,"-",t,e);if(this._currentChar===u.slash)return this._advance(),new h(r.div,"/",t,e);if(this._currentChar===u.star)return this._advance(),new h(r.mult,"*",t,e);if(this._currentChar===u.percent)return this._advance(),new h(r.mod,"%",t,e);if(this._currentChar===u.colon)return this._advance(),new h(r.colon,":",t,e);if(this._currentChar===u.not)return this._advance(),this._currentChar===u.equal?(this._advance(),new h(r.notEq,"!=",t,e)):new h(r.not,"!",t,e);if(this._currentChar===u.and&&this._pick()===u.and)return this._advance(),this._advance(),new h(r.and,"&&",t,e);if(this._currentChar===u.pipe&&this._pick()===u.pipe)return this._advance(),this._advance(),new h(r.or,"||",t,e);if(this._currentChar===u.questionMark&&this._pick()===u.questionMark)return this._advance(),this._advance(),new h(r.nullity,"??",t,e);if(this._currentChar===u.quote||this._currentChar===u.squote){let s=this._currentChar;this._advance();let n=this._literalString(s);return this._advance(),n}return new h(r.invalid,String.fromCharCode(this._currentChar),t,e)}return new h(r.eof,"",t,e)}};y._defaultLanguage=new L("en",{if:"if",else:"else",true:"true",false:"false",null:"null",while:"while",for:"for",with:"with",up:"up",down:"down",till:"till",in:"in",break:"break",continue:"continue",return:"return"}),y.languages=[y._defaultLanguage,new L("fr",{si:"if",sinon:"else",vrai:"true",faux:"false",nul:"null",tanque:"while",pour:"for",avec:"with",mont:"up",desc:"down",jusqua:"till",dans:"in",couper:"break",continuer:"continue",returner:"return"}),new L("bm",{nii:"if",note:"else",tien:"true",galon:"false",gansan:"null",foo:"while",seginka:"for",niin:"with",kay:"up",kaj:"down",kata:"till",kono:"in",tike:"break",ipan:"continue",segin:"return"})],y.RESERVED={if:h.from(r.IF,"if"),else:h.from(r.ELSE,"else"),true:h.from(r.TRUE,!0),false:h.from(r.FALSE,!1),null:h.from(r.NULL,null),for:h.from(r.FOR_LOOP,"for"),while:h.from(r.WHILE_TILL,"while"),with:h.from(r.with,"with"),up:h.from(r.up,"up"),down:h.from(r.down,"down"),till:h.from(r.TILL,"till"),in:h.from(r.in,"in"),break:h.from(r.BREAK,"break"),continue:h.from(r.CONTINUE,"continue"),return:h.from(r.RETURN,"return")};var Z=y,d=class{constructor(t,e){this.line=t,this.col=e}dump(){return this.toString()}},F=class extends d{constructor(t,e,i){super(1,1),this.body=t,this.name=e,this.source=i}dump(){let t=`Module ${this.name} Start {`;for(let e of this.body)t+=`${e.dump()}
-`;return t+="}",t}},I=class extends d{constructor(t,e){super(e.line,e.col),this.body=t}toString(){return`{
-${this.body.map(t=>t.toString()).join(`
-`)}}`}},g=class extends d{constructor(t){super(t.line,t.col),this.value=t.value.toString()}toString(){return this.value}},m=class extends d{constructor(t,e){super(t.line,t.col),this.value=t.value,this.raw=e}toString(){return this.value.toString()}},E=class extends d{constructor(t,e){super(t.line,t.col),this.identifier=t,this.init=e}toString(){return`${this.identifier} = ${this.init}`}},X=class extends d{constructor(t){super(t.line,t.col),this.expression=t}toString(){return this.expression.toString()}},R=class extends d{constructor(t,e){super(t.line,t.col),this.callee=t,this.arguments=e}toString(){return`${this.callee.toString()}(...${this.arguments.length})`}},V=class extends d{constructor(t,e,i){super(t.line,t.col),this.left=t,this.operation=e,this.right=i}toString(){return`${this.left} ${this.operation} ${this.right}`}},q=class extends d{constructor(t,e){super(t.line,t.col),this.operation=t,this.argument=e}toString(){return`${this.operation} ${this.argument}`}},B=class extends d{constructor(t,e,i){super(t.line,t.col),this.test=t,this.consequent=e,this.alternate=i}toString(){return`if ${this.test} ${this.consequent} ${this.alternate?`else ${this.alternate} `:""}`}},P=class extends d{constructor(t,e,i){super(t.line,t.col),this.left=t,this.operator=e,this.right=i}toString(){return`${this.left} ${this.operator.value} ${this.right}`}},T=class extends d{constructor(e,i,s=!1){super(e.line,e.col);this.computed=!1;this.owner=e,this.key=i,this.computed=s}toString(){return`${this.owner}[${this.key}]`}},j=class extends d{constructor(t,e,i){super(e==null?void 0:e.line,e==null?void 0:e.col),this.properties=t}toString(){return"{...}"}},N=class extends d{constructor(t,e,i){super(e==null?void 0:e.line,e==null?void 0:e.col),this.elements=t}toString(){return"[...]"}},k=class extends d{constructor(t,e){super(t.line,t.col),this.value=e,this.key=t}},U=class extends d{constructor(e,i,s,n,o=!1){super(s==null?void 0:s.line,s==null?void 0:s.col);this.retain=!1;this.test=e,this.body=i,this.retain=o}},M=class extends d{constructor(e,i,s,n,o,a,p,S=!1){super(a==null?void 0:a.line,a==null?void 0:a.col);this.init=e;this.test=i;this.update=s;this.direction=n;this.body=o;this.retain=S}},W=class extends d{constructor(e,i,s,n,o,a=!1){super(n==null?void 0:n.line,n==null?void 0:n.col);this.identifier=e;this.collection=i;this.body=s;this.retain=a}},D=class extends d{constructor(e,i){super(e.line,e.col);this.first=e;this.second=i}},H=class extends d{constructor(t,e){super(t,e)}},K=class extends d{constructor(t,e,i){super(e,i),this.value=t}},z=class extends d{constructor(t,e){super(t,e)}},tt=class{constructor(t=1/0){this.capacity=t;this.storage=[]}push(t){if(this.size()===this.capacity)throw Error("Stack has reached max capacity, you cannot add more items");this.storage.push(t)}pop(){return this.storage.pop()}peek(){return this.storage[this.size()-1]}size(){return this.storage.length}get isEmpty(){return this.storage.length===0}},$=class ${constructor(t){this._loopTrack=new tt;this.currentToken=t.nextToken(),this.lexer=t}_eat(t){var e;((e=this.currentToken)==null?void 0:e.type)===t?this.currentToken=this.lexer.nextToken():b(this.currentToken,t)}_eatEOL(){var t;for(;((t=this.currentToken)==null?void 0:t.type)===r.eol;)this._eat(r.eol)}_eatSemiOrEOL(){var t,e;for(;((t=this.currentToken)==null?void 0:t.type)===r.eol||((e=this.currentToken)==null?void 0:e.type)===r.semi;)this._eat(this.currentToken.type)}_eatSemi(){var t;for(;((t=this.currentToken)==null?void 0:t.type)===r.semi;)this._eat(r.semi)}_variable(){let t=new g(this.currentToken);return this._eat(r.id),t}_return(){let t=this.currentToken,e;return!this._expect(r.eol)&&!this._expect(r.semi)&&(e=this._expression()),new K(e,t==null?void 0:t.line,t==null?void 0:t.col)}_factor(){let t=this.currentToken;switch(t.type){case r.plus:case r.minus:case r.not:return this._eat(this.currentToken.type),new q(t,this._term());case r.numberConst:return this._eat(r.numberConst),new m(t,t.value.toString());case r.stringConst:return this._eat(r.stringConst),new m(t,t.value.toString());case r.lparen:this._eat(r.lparen);let e=this._expression();return this._eat(r.rparen),e;case r.TRUE:case r.FALSE:return this._eat(this.currentToken.type),new m(t,t.value.toString());case r.NULL:return this._eat(r.NULL),new m(t,"null");case r.lbracket:return this._arrayExpression();case r.lbrace:return this._objectExpression();case r.IF:return this._ifStatement();case r.WHILE_TILL:return this._whileLoop(!0);case r.FOR_LOOP:return this._forLoop(!0);case r.BREAK:return this._breakExpression();case r.CONTINUE:return this._continueExpression();default:return this._variable()}}_breakExpression(){var t,e;return this._loopTrack.isEmpty&&b(this.currentToken),this._eat(r.BREAK),new H((t=this.currentToken)==null?void 0:t.line,(e=this.currentToken)==null?void 0:e.col)}_continueExpression(){var t,e;return this._loopTrack.isEmpty&&b(this.currentToken),this._eat(r.CONTINUE),new z((t=this.currentToken)==null?void 0:t.line,(e=this.currentToken)==null?void 0:e.col)}_term(){let t=this._factor();return t=this._tryParsingFunctionCall(t),t=this._tryParsingMemberExpression(t),t}_expression(){let t=this._term();for(t=this._tryBinaryExpression(0,t);[r.and,r.or,r.nullity].includes(this.currentToken.type);){let e=this.currentToken;this._eat(e.type),t=new P(t,e,this._expression())}if(this._expect(r.equal))if(t instanceof g||t instanceof T){let e=this.currentToken;this._eat(r.equal),t=new E(t,this._expression())}else throw new Error("Unexpected token");return t}_objectProperty(){var s;let t;switch((s=this.currentToken)==null?void 0:s.type){case r.stringConst:{t=new m(this.currentToken,this.currentToken.value),this._eat(r.stringConst);break}case r.lbracket:{this._eat(r.lbracket);var e=this._expression();this._eat(r.rbracket),t=e;break}case r.id:{let n=this._variable();t=new m(new h(r.id,n.value,n.line,n.col),n.value);break}default:throw`Unexpected token ${this.currentToken}`}this._eat(r.colon);var i=this._expression();return new k(t,i)}_property(){return this._objectProperty()}_objectProperties(){var e,i;let t=[];for(((e=this.currentToken)==null?void 0:e.type)!=r.rbrace&&(this._eatEOL(),t.push(this._property()),this._eatEOL());((i=this.currentToken)==null?void 0:i.type)===r.comma&&(this._eat(r.comma),this._eatEOL(),!this._expect(r.rbrace));)t.push(this._property()),this._eatEOL();return t}_objectExpression(t){var e=t!=null?t:this.currentToken;t||this._eat(r.lbrace);var i=this._objectProperties();return this._eat(r.rbrace),new j(i,e,this.currentToken)}_arrayExpression(){this._eat(r.lbracket);let t=this._expect(r.rbracket)?[]:this._expressionsList();this._eat(r.rbracket);var e=t.length!==0?t[0]:void 0,i=t.length!==0?t[t.length-1]:void 0;return new N(t,e,i)}_tryParsingMemberExpression(t){let e=t;for(;this.currentToken.type===r.lbracket;){this._eat(r.lbracket);let i=this._expression();e=new T(e,i),this._eat(r.rbracket)}return e}_tryBinaryExpression(t,e){let i=e;for(;;){let s=$._binopPrecdences[this.currentToken.type]||-1;if(s<t)return i;let n=this.currentToken;this._eat(n.type);let o=this._term(),a=$._binopPrecdences[this.currentToken.type]||-1;if(s<a){let p=this._tryBinaryExpression(s+1,o);if(p===i)return p;o=p}i=new V(i,n,o)}}_expressionsList(){var i;this._eatEOL();let t=this._expression();this._eatEOL();let e=[t];for(;((i=this.currentToken)==null?void 0:i.type)===r.comma&&(this._eat(r.comma),this._eatEOL(),!this._expect(r.rbracket));)t=this._expression(),e.push(t),this._eatEOL();return e}_callExpression(t){this._eat(r.lparen);let e=[];return this._expect(r.rparen)||(e=this._expressionsList()),this._eat(r.rparen),t instanceof g||b(this.currentToken),new R(t,e)}_tryParsingFunctionCall(t){let e=t;for(;this.currentToken.type===r.lparen;)e=this._callExpression(e);return e}_statementExpression(){let t=this._expression();return[r.semi,r.eol,r.eof].includes(this.currentToken.type)||b(this.currentToken),t}_blockStatement(t=!1){var i;if(t||this._eat(r.lbrace),this._eatEOL(),this._expect(r.rbrace))return this._eat(r.rbrace),new I([],this.currentToken);let e=[this._statement()];for(;this._eatSemiOrEOL(),!(this.currentToken.type===r.rbrace||this.currentToken.type===r.eof||(e.push(this._statement()),this._expect(r.rbrace)));)this.currentToken.type!==r.eol&&this.currentToken.type!==r.semi&&this.currentToken.type!==r.eof&&b(this.currentToken);return this._eat(r.rbrace),((i=this.currentToken)==null?void 0:i.type)===r.rbrace&&this._eat(r.rbrace),new I(e,this.currentToken)}_ifStatement(){this._eat(r.IF);let t=this.currentToken.type===r.lparen;t&&this._eat(r.lparen);let e=this._expression();t&&this._eat(r.rparen);let i;this.currentToken.type===r.lbrace?i=this._blockStatement():i=this._expression();let s;if(this.currentToken.type===r.ELSE)switch(this._eat(r.ELSE),this.currentToken.type){case r.IF:s=this._ifStatement();break;case r.lbrace:s=this._blockStatement();break;default:s=this._expression()}return new B(e,i,s)}_pushLoop(){this._loopTrack.push(!0)}_popLoop(){this._loopTrack.pop()}_whileLoop(t=!1){let e=this.currentToken;this._eat(r.WHILE_TILL),this._pushLoop();let i=this._expression(),s=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();return this._popLoop(),new U(i,s,e,this.currentToken,t)}_forOfIdentifier(){switch(this.currentToken.type){case r.lparen:{this._eat(r.lparen);let t=this._variable();this._eat(r.comma);let e=this._variable();return this._eat(r.rparen),new D(t,e)}default:return this._variable()}}_forLoop(t=!1){let e=this.currentToken;this._eat(r.FOR_LOOP),this._pushLoop();let i=[r.lparen].includes(this.currentToken.type),s;if(i)s=this._forOfIdentifier();else{let n=this._expression();n instanceof E||(i=!0),s=n}if(!i&&s instanceof E){this._eat(r.TILL);let n=this._expression(),o;if(this.currentToken.type===r.up||this.currentToken.type===r.down){let S=this.currentToken;this._eat(S.type),o=S}else o=new h(r.up,"up");let a;this._expect(r.with)?(this._eat(r.with),a=this._expression()):a=new m(new h(r.numberConst,1,this.currentToken.line,this.currentToken.col),"1");let p=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();s=new M(s,n,a,o,p,e,this.currentToken,t),this._popLoop()}else if(i){this._eat(r.in);let n=this._expression(),o=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();s=new W(s,n,o,e,this.currentToken,t),this._popLoop()}else b(this.currentToken);return s}_statement(){switch(this.currentToken.type){case r.BREAK:return this._breakExpression();case r.CONTINUE:return this._continueExpression();case r.RETURN:return this._eat(r.RETURN),this._return();case r.semi:return this._eatSemi(),this._statement();case r.eol:return this._eatEOL(),this._statement();case r.WHILE_TILL:return this._whileLoop();case r.FOR_LOOP:return this._forLoop();default:return this._statementExpression()}}_expect(t){var e;return((e=this.currentToken)==null?void 0:e.type)===t}_definition(){if(this._eatSemiOrEOL(),this._expect(r.eof))return[];let t=[this._statement()];for(;;){if(this._eatSemiOrEOL(),this.currentToken.type===r.eof){this._eat(r.eof);break}this.currentToken.type===r.lbrace?t.push(this._blockStatement()):t.push(this._statement())}return t}_root(){let t=this.lexer.source,e="<module>",i=this._definition();return new F(i,e,t)}parse(){return this._root()}};$._binopPrecdences={[r.eqeq]:10,[r.notEq]:10,[r.great]:10,[r.greatEq]:10,[r.less]:10,[r.lessEq]:10,[r.plus]:20,[r.minus]:20,[r.mult]:40,[r.div]:40,[r.mod]:40};var et=$,C=class{},A=class extends C{},w=class extends C{},f=class{constructor(t){this.value=t}},rt=class{constructor(){this._nodesVisitors={}}registerVisitor(t,e){let i=`visit${t.name}`;this._nodesVisitors[i]=e}},G=class extends rt{constructor(){super(),this.registerVisitor(F,this.visitRootAST),this.registerVisitor(I,this.visitBlockStatementAST),this.registerVisitor(g,this.visitIdentifierAST),this.registerVisitor(m,this.visitLiteralAST),this.registerVisitor(E,this.visitAssignmentExpressionAST),this.registerVisitor(X,this.visitExpressionStatementAST),this.registerVisitor(R,this.visitCallExpressionAST),this.registerVisitor(V,this.visitBinaryExpressionAST),this.registerVisitor(q,this.visitUnaryExpressionAST),this.registerVisitor(B,this.visitIfStatementAST),this.registerVisitor(P,this.visitLogicalExpressionAST),this.registerVisitor(T,this.visitIndexAccessorAST),this.registerVisitor(k,this.visitObjectProperty),this.registerVisitor(j,this.visitObjectExpression),this.registerVisitor(N,this.visitArrayExpression),this.registerVisitor(U,this.visitWhileLoopStatement),this.registerVisitor(M,this.visitForLoopStatement),this.registerVisitor(W,this.visitForOfStatement),this.registerVisitor(H,this.visitBreakAST),this.registerVisitor(z,this.visitContinueAST),this.registerVisitor(K,this.visitReturnAST)}visit(t){var e;try{let i=`visit${t.constructor.name}`,s=this._nodesVisitors[i];return(e=s==null?void 0:s.call(this,t))!=null?e:null}catch{return null}}assignProperty(t,e,i){(Array.isArray(t)||typeof t=="object")&&(t[e]=i)}},Q=class{constructor(t,e,i){this.memory={};this.name=t,this.memory=e,this.parent=i}resolve(t){var e,i;return Object.keys(this.memory).includes(t)?this.memory[t]:(i=(e=this.parent)==null?void 0:e.resolve(t))!=null?i:null}change(t,e,i=!0){return Object.keys(this.memory).includes(t)?(this.memory[t]=e,!0):this.parent&&this.parent.change(t,e,!1)?!0:i?(this.memory[t]=e,!0):!1}},_=class _ extends G{constructor(){super();this.rootScope=new Q("Program",{});this.currentScope=this.rootScope;this.debug=!1;this._functionsRegistry={};this._functionsRegistry={..._._globalFunctionsRegistry}}resolve(e){var i,s;return(s=(i=this.currentScope)==null?void 0:i.resolve(e))!=null?s:null}changeVariable(e,i){var s;return(s=this.currentScope)!=null&&s.change(e,i)?i:null}pushScope(e){let i=new Q(e,{},this.currentScope);this.currentScope=i}popScope(){var e;this.currentScope=(e=this.currentScope)==null?void 0:e.parent}log(e){this.debug&&console.log(e)}visitRootAST(e){var n;let i=e.body,s;for(let o of i)if(s=this.visit(o),s instanceof f)return(n=s.value)!=null?n:null;return s!=null?s:null}visitBlockStatementAST(e){let i=e.body,s;this.pushScope("Block");for(let n of i)if(s=this.visit(n),s instanceof C||s instanceof f)break;return this.popScope(),s!=null?s:null}visitIdentifierAST(e){var s;let i=e.value;return(s=this==null?void 0:this.resolve(i))!=null?s:null}visitLiteralAST(e){return e.value}visitAssignmentExpressionAST(e){let i=e.identifier,s=e.init,n=null;if(i instanceof T){var o=this.visit(i.owner);n=this.visit(e.init);var a=this.visit(i.key);this.assignProperty(o,a,n)}else i instanceof g&&(n=this.visit(s),this.changeVariable(i.value,n));return n}visitExpressionStatementAST(e){let i=e.expression;return this.visit(i)}visitCallExpressionAST(e){let i=e.callee,s=e.arguments,n=i.value,o=this.resolveFunction(n),a=s.map(p=>this.visit(p));return o==null?void 0:o(a,this)}visitBinaryExpressionAST(e){let i=e.left,s=e.right,n=e.operation,o=this.visit(i),a=this.visit(s);switch(n.type){case r.plus:return l(o)&&l(a)?o+a:`${o}${a}`;case r.minus:if(l(o)&&l(a))return o-a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.mult:if(l(o)&&l(a))return o*a;if(x(o)&&l(a))return o.repeat(a);if(l(o)&&x(a))return a.repeat(o);throw new Error(`Operation ${n.value} not allowed no num value`);case r.div:if(l(o)&&l(a)){if(a===0)throw new Error("Invalid division by 0");return o/a}throw new Error(`Operation ${n.value} not allowed no num value`);case r.mod:if(l(o)&&l(a))return o%a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.great:if(l(o)&&l(a))return o>a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.greatEq:if(l(o)&&l(a))return o>=a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.less:if(l(o)&&l(a))return o<a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.lessEq:if(l(o)&&l(a))return o<=a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.eqeq:return o===a;case r.notEq:return o!==a;default:throw new Error(`Operation ${n.value} not allowed no num value`)}}visitUnaryExpressionAST(e){let i=e.argument,s=e.operation,n=this.visit(i);if(s.type===r.not)return v(n)===!1;if(!l(n))throw new Error(`Operation ${s.value} not allowed no num value`);if(s.type===r.plus)return n;if(s.type===r.minus)return-n;throw new Error(`Operation ${s.value} not allowed no num value`)}visitIfStatementAST(e){let i=e.test,s=this.visit(i);return v(s)?this.visit(e.consequent):e.alternate?this.visit(e.alternate):null}visitLogicalExpressionAST(e){let i=e.left,s=this.visit(i);if(e.operator.type===r.nullity)return s!=null?s:this.visit(e.right);let n=v(s);return e.operator.type===r.and?n?v(this.visit(e.right)):!1:e.operator.type===r.or?n?!0:v(this.visit(e.right)):null}visitIndexAccessorAST(e){var n,o;let i=e.owner,s=this.visit(i);if(s==null)return null;if(typeof s=="object"){let a=this.visit(e.key);return(n=s[a])!=null?n:null}else if(Array.isArray(s)){let a=this.visit(e.key);return l(a)&&s.length<a&&a>=0&&(o=s[a])!=null?o:null}return null}visitObjectProperty(e){}visitObjectExpression(e){let i={},s=e;for(let n of s.properties)if(n instanceof k){let o=this.visit(n.key);o=x(o)?o:o.toString(),i[o]=this.visit(n.value)}return i}visitArrayExpression(e){let i=e;return this.resolveArguments(i.elements)}visitBreakAST(e){return new A}visitWhileLoopStatement(e){this.log(`WhileLoopStatement ${e.test} ${e.body}`);let i=e.retain?[]:void 0;for(;v(this.visit(e.test));){let s=this.visit(e.body);if(s instanceof A)break;if(!(s instanceof w)){if(s instanceof f)return this.popScope(),s;i==null||i.push(s)}}return i!=null?i:null}visitForLoopStatement(e){let i=e.retain?[]:void 0,s=e.init.identifier;if(!(s instanceof g))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let n=this.visit(e.init.init);this.changeVariable(s.value,n);let o=()=>{let p=this.visit(e.test);if(l(p)){let S=this.resolve(s.value);return e.direction.type===r.up?p>=S:p<=S}return v(p)},a=()=>{let p=this.visit(e.update);if(l(p)){let S=this.resolve(s.value);if(!l(S))throw Error("Cant update value");this.changeVariable(s.value,e.direction.type===r.up?S+p:S-p)}else throw Error("Update value cant be non number")};for(;o();){let p=this.visit(e.body);if(p instanceof A)break;if(p instanceof w){a();continue}if(p instanceof f)return this.popScope(),p;i==null||i.push(p),a()}return this.popScope(),i!=null?i:null}visitForOfStatement(e){let i=this.visit(e.collection);if(!Array.isArray(i))throw Error("Can iterate non array object");let s=e.retain?[]:void 0;this.pushScope("ForOfStatement");for(let n of i){this._declareForIdentifier(e.identifier,n);let o=this.visit(e.body);if(o instanceof A)break;if(!(o instanceof w)){if(o instanceof f)return this.popScope(),o;s==null||s.push(o)}}return this.popScope(),s!=null?s:null}visitContinueAST(e){return new w}visitReturnAST(e){return new f(e.value!=null?this.visit(e.value):null)}_declareForIdentifier(e,i){if(e instanceof D){if(!Array.isArray(i))throw Error("Unable to make a tuple from non Array element");this.changeVariable(e.first.value,i[0]),this.changeVariable(e.second.value,i[1])}this.changeVariable(e.value,i)}resolveArguments(e){return e.map(i=>this.visit(i))}setFunctionResolver(e){this._functionResolver=e}resolveFunction(e){var i,s;return(s=this._functionsRegistry[e])!=null?s:(i=this._functionResolver)==null?void 0:i.call(this,e)}registerFunction(e,i){this._functionsRegistry[e]=i}unregisterFunction(e){delete this._functionsRegistry[e]}execute(e,i=!0,s){let n=_.compile(e,i);return s&&Object.keys(s).forEach(o=>this.changeVariable(o,s[o])),this.visit(n)}static compile(e,i=!1){let s=ht(e);if(i&&this._cache.has(s))return this._cache.get(s);let n=new Z(e),a=new et(n).parse();return i&&this._cache.set(s,a),a}static register(e,i){_._globalFunctionsRegistry[e]=i}static unregister(e){delete _._globalFunctionsRegistry[e]}static run(e,i=!1,s){let n=new _,o=_.compile(e,i);return s&&Object.keys(s).forEach(a=>n.changeVariable(a,s[a])),n.visit(o)}static newInstance(){return new _}clone(){var e=new _;return e._functionsRegistry={...this._functionsRegistry},e.rootScope.memory={...this.rootScope.memory},e}newAsyncInstance(){let e=J.newInstance();return e.rootScope.memory=this.rootScope.memory,e._functionsRegistry=this._functionsRegistry,e}};_._globalFunctionsRegistry={},_._cache=new Map;var O=_,J=class c extends O{constructor(){super()}async visitRootAST(t){var s;let e=t.body,i;for(let n of e)if(i=await this.visit(n),i instanceof f)return(s=i.value)!=null?s:null;return i!=null?i:null}async visitBlockStatementAST(t){let e=t.body,i;this.pushScope("Block");for(let s of e)if(i=await this.visit(s),i instanceof C||i instanceof f)break;return this.popScope(),i}async visitIdentifierAST(t){let e=t.value;return this.resolve(e)}async visitLiteralAST(t){return t.value}async visitAssignmentExpressionAST(t){let e=t.identifier,i=t.init,s=null;if(e instanceof T){var n=await this.visit(e.owner);s=await this.visit(t.init);var o=await this.visit(e.key);this.assignProperty(n,o,s)}else e instanceof g&&(s=await this.visit(i),this.changeVariable(e.value,s));return s}async visitExpressionStatementAST(t){let e=t.expression;return await this.visit(e)}async visitCallExpressionAST(t){let e=t.callee,i=t.arguments,s=e.value,n=this._functionsRegistry[s],o=await Promise.all(i.map(a=>this.visit(a)));return await(n==null?void 0:n(o,this))}async visitBinaryExpressionAST(t){let e=t.left,i=t.right,s=t.operation,n=await this.visit(e),o=await this.visit(i);switch(s.type){case r.plus:return l(n)&&l(o)?n+o:`${n}${o}`;case r.minus:if(l(n)&&l(o))return n-o;if(x(n)&&l(o))return n.repeat(o);if(l(n)&&x(o))return o.repeat(n);throw new Error(`Operation ${s.value} not allowed no num value`);case r.mult:if(l(n)&&l(o))return n*o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.div:if(l(n)&&l(o)){if(o===0)throw new Error("Invalid division by 0");return n/o}throw new Error(`Operation ${s.value} not allowed no num value`);case r.mod:if(l(n)&&l(o))return n%o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.great:if(l(n)&&l(o))return n>o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.greatEq:if(l(n)&&l(o))return n>=o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.less:if(l(n)&&l(o))return n<o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.lessEq:if(l(n)&&l(o))return n<=o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.eqeq:return n===o;case r.notEq:return n!==o;default:throw new Error(`Operation ${s.value} not allowed no num value`)}}async visitUnaryExpressionAST(t){let e=t.argument,i=t.operation,s=await this.visit(e);if(i.type===r.not)return v(s)===!1;if(!l(s))throw new Error(`Operation ${i.value} not allowed no num value`);if(i.type===r.plus)return s;if(i.type===r.minus)return-s;throw new Error(`Operation ${i.value} not allowed no num value`)}async visitIfStatementAST(t){let e=t.test,i=await this.visit(e);return v(i)?await this.visit(t.consequent):t.alternate?await this.visit(t.alternate):null}async visitLogicalExpressionAST(t){let e=t.left,i=await this.visit(e);if(t.operator.type===r.nullity)return i!=null?i:await this.visit(t.right);let s=v(i);return t.operator.type===r.and?s?v(await this.visit(t.right)):!1:t.operator.type===r.or?s?!0:v(await this.visit(t.right)):!1}async visitIndexAccessorAST(t){var s,n;let e=t.owner,i=await this.visit(e);if(i==null)return null;if(typeof i=="object"){let o=await this.visit(t.key);return(s=i[o])!=null?s:null}else if(Array.isArray(i)){let o=await this.visit(t.key);return l(o)&&i.length<o&&o>=0&&(n=i[o])!=null?n:null}return null}async visitObjectProperty(t){}async visitObjectExpression(t){let e={},i=t;for(let s of i.properties)if(s instanceof k){let n=await this.visit(s.key);n=x(n)?n:n.toString(),e[n]=await this.visit(s.value)}return e}async visitArrayExpression(t){let e=t;return await this.resolveArgumentsAsync(e.elements)}async visitWhileLoopStatement(t){this.log(`WhileLoopStatement ${t.test} ${t.body}`);let e=t.retain?[]:void 0;for(;v(await this.visit(t.test));){let i=await this.visit(t.body);if(i instanceof A)break;if(!(i instanceof w)){if(i instanceof f)return this.popScope(),i;e==null||e.push(i)}}return e}async visitForLoopStatement(t){let e=t.retain?[]:void 0,i=t.init.identifier;if(!(i instanceof g))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let s=await this.visit(t.init.init);this.changeVariable(i.value,s);let n=async()=>{let a=await this.visit(t.test);if(l(a)){let p=this.resolve(i.value);return t.direction.type===r.up?a>=p:a<=p}return v(a)},o=async()=>{let a=await this.visit(t.update);if(l(a)){let p=this.resolve(i.value);if(!l(p))throw Error("Cant update value");this.changeVariable(i.value,t.direction.type===r.up?p+a:p-a)}else throw Error("Update value cant be non number")};for(;await n();){let a=await this.visit(t.body);if(a instanceof A)break;if(a instanceof w){await o();continue}if(a instanceof f)return this.popScope(),a;e==null||e.push(a),await o()}return this.popScope(),e!=null?e:null}async visitForOfStatement(t){let e=await this.visit(t.collection);if(!Array.isArray(e))throw Error("Can iterate non array object");let i=t.retain?[]:void 0;this.pushScope("ForOfStatement");for(let s of e){this._declareForIdentifier(t.identifier,s);let n=await this.visit(t.body);if(n instanceof A)break;if(!(n instanceof w)){if(n instanceof f)return this.popScope(),n;i==null||i.push(n)}}return this.popScope(),i}async visitReturnAST(t){return new f(t.value!=null?await this.visit(t.value):null)}async resolveArgumentsAsync(t){return await Promise.all(t.map(async e=>await this.visit(e)))}registerFunction(t,e){this._functionsRegistry[t]=e}unregisterFunction(t){delete this._functionsRegistry[t]}async execute(t,e=!0,i){let s=O.compile(t,e);return i&&Object.keys(i).forEach(n=>this.changeVariable(n,i[n])),await this.visit(s)}static async run(t,e=!1,i){let s=new c,n=O.compile(t,e);return i&&Object.keys(i).forEach(o=>s.changeVariable(o,i[o])),await s.visit(n)}static newInstance(){return new c}clone(){var t=new c;return t._functionsRegistry={...this._functionsRegistry},t.rootScope.memory={...this.rootScope.memory},t}};0&&(module.exports={AST,ArrayExpression,AssignmentExpressionAST,BinaryExpressionAST,BlockStatementAST,BreakAST,BreakBranch,CallExpressionAST,ContinueAST,ContinueBranch,ExpressionStatementAST,ForLoopStatement,ForOfStatement,IdentifierAST,IfStatementAST,IndexAccessorAST,LexerDictionary,LiteralAST,LogicalExpressionAST,LoopControl,MEventScope,MEvento,MEventoAsync,NodeVisitor,ObjectExpression,ObjectProperty,ReturnAST,ReturnBranch,RootAST,Token,TokenType,TupleExpression,UnaryExpressionAST,WhileLoopStatement});
+var pt=Object.defineProperty;var Tt=Object.getOwnPropertyDescriptor;var kt=Object.getOwnPropertyNames;var Ct=Object.prototype.hasOwnProperty;var Mt=(a,e)=>{for(var t in e)pt(a,t,{get:e[t],enumerable:!0})},Lt=(a,e,t,n)=>{if(e&&typeof e=="object"||typeof e=="function")for(let r of kt(e))!Ct.call(a,r)&&r!==t&&pt(a,r,{get:()=>e[r],enumerable:!(n=Tt(e,r))||n.enumerable});return a};var Ot=a=>Lt(pt({},"__esModule",{value:!0}),a);var Ut={};Mt(Ut,{AST:()=>m,ArrayExpression:()=>$,AssignmentExpressionAST:()=>L,BinaryExpressionAST:()=>P,BlockStatementAST:()=>F,BreakAST:()=>Z,BreakBranch:()=>C,CallExpressionAST:()=>j,ContinueAST:()=>tt,ContinueBranch:()=>M,ExpressionStatementAST:()=>G,ForLoopStatement:()=>D,ForOfStatement:()=>K,IdentifierAST:()=>x,IfStatementAST:()=>U,IndexAccessorAST:()=>w,LexerDictionary:()=>X,LiteralAST:()=>A,LogicalExpressionAST:()=>W,LoopControl:()=>R,MEventScope:()=>rt,MEvento:()=>it,MEventoAsync:()=>lt,MEventoRuntimeError:()=>S,NodeVisitor:()=>ct,ObjectExpression:()=>I,ObjectProperty:()=>O,ReturnAST:()=>H,ReturnBranch:()=>y,RootAST:()=>q,Token:()=>l,TokenType:()=>i,TupleExpression:()=>N,UnaryExpressionAST:()=>z,WhileLoopStatement:()=>B});module.exports=Ot(Ut);function T(a,e){let t=`Invalid token ${a.type}[${a.value}] at ${a.line}, ${a.col} ${e?`: expecting ${e} token`:""}
+`;throw Error(t)}function h(a){return typeof a=="number"}function Nt(a){return typeof a=="boolean"}function Y(a){return typeof a=="string"}function b(a){return!(a===null||h(a)&&a===0||Y(a)&&a.length===0||Nt(a)&&!a)}function It(a){let e=0,t=0,n;if(a.length===0)return e;for(t=0;t<a.length;t++)n=a.charCodeAt(t),e=(e<<5)-e+n,e|=0;return e}var i=class{};i.id=0,i.comma=1,i.semi=2,i.numberConst=3,i.stringConst=4,i.equal=5,i.lparen=6,i.rparen=7,i.eol=8,i.eof=9,i.lbrace=10,i.rbrace=11,i.lbracket=12,i.rbracket=13,i.great=14,i.greatEq=15,i.less=16,i.lessEq=17,i.eqeq=18,i.IF=19,i.ELSE=20,i.TRUE=21,i.FALSE=22,i.NULL=23,i.not=24,i.notEq=25,i.and=26,i.or=27,i.plus=28,i.minus=29,i.div=30,i.mult=31,i.mod=32,i.invalid=33,i.colon=34,i.WHILE_TILL=35,i.FOR_LOOP=36,i.up=37,i.down=38,i.with=39,i.in=40,i.TILL=41,i.BREAK=42,i.CONTINUE=43,i.nullity=44,i.RETURN=45,i.dot=46;var l=class a{constructor(e,t,n=1,r=1){this.type=e,this.value=t,this.line=n,this.col=r}static from(e,t){return new a(e,t)}toString(){return`[${this.type.toString()}, ${this.value}]`}},c=class{};c.equal=61,c.comma=44,c.semiColon=59,c.lparen=40,c.rparen=41,c.backslash=92,c.quote=34,c.squote=39,c.plus=43,c.minus=45,c.star=42,c.slash=47,c.percent=37,c.lbrace=123,c.rbrace=125,c.lbracket=91,c.rbracket=93,c.not=33,c.great=62,c.less=60,c.and=38,c.pipe=124,c.colon=58,c.questionMark=63,c.shebang=35,c.dot=46;var X=class{constructor(e,t){this.keywords={};this.keywords={...t},this.lang=e}},k=class k{constructor(e){this._position=0;this._line=1;this._col=1;this._currentChar=-1;this._source=e,this._currentChar=this._source[this._position].charCodeAt(0),this._resolveLanguage()}get source(){return this._source}_resolveLanguage(){var t;let e=this.nextToken();if(e.type===i.less){let n=this.nextToken();n.type!==i.id&&T(e);let r=n.value.toString();this._language=(t=k.languages.find(s=>s.lang===r))!=null?t:k._defaultLanguage,e=this.nextToken(),e.type!==i.great&&T(e)}else this._language=k._defaultLanguage,this._position=0,this._currentChar=this._source[this._position].charCodeAt(0)}_advance(){if(this._position++,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col++}_jump(e){if(this._position+=e,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col+=e}_pick(){return this._position+1>=this._source.length?-1:this._source[this._position+1].charCodeAt(0)}_isId(e){return e<48?e===36:e<58?!0:e<65?!1:e<91?!0:e<97?e===95:e<123}_isIdStart(e){return e<65?e===36:e<91?!0:e<97?e===95:e<123}_id(){var o,u;let e="",t=this._col,n=this._position,r=this._line;for(;this._isId(this._currentChar);)e+=String.fromCharCode(this._currentChar),this._advance();let s=this._language&&(o=this._language.keywords[e])!=null?o:e;return(u=k.RESERVED[s])!=null?u:new l(i.id,e,r,t)}_isLineEnd(e){return e===10||e===13||[`
+`,"\r","\u2028","\u2029"].includes(String.fromCharCode(e))}_isWhiteSpace(e){return[" ","	"].includes(String.fromCharCode(e))}_isDigit(e){return e>0&&(e^48)<=9}_skipWhiteSpace(){for(;this._isWhiteSpace(this._currentChar)===!0;)this._advance()}_number(){let e="",t=this._col,n=this._position,r=this._line,s=String.fromCharCode(this._currentChar);this._advance();let o=String.fromCharCode(this._currentChar),u=10;if(s==="0"&&["b","B","x","X","o","O"].includes(o))switch(this._advance(),o.toLowerCase()){case"b":u=2;break;case"o":u=8;break;case"x":u=16;break;default:u=10}else e+=s,u=10;for(;this._isDigit(this._currentChar)||u===16&&["A","a","B","b","C","c","D","d","E","e","F","f"].includes(String.fromCharCode(this._currentChar));)e+=String.fromCharCode(this._currentChar),this._advance();if(String.fromCharCode(this._currentChar)==="."&&this._isDigit(this._pick())===!0){for(u!==10&&T(new l(i.id,o,r,n)),e+=String.fromCharCode(this._currentChar),this._advance();this._isDigit(this._currentChar);)e+=String.fromCharCode(this._currentChar),this._advance();return new l(i.numberConst,parseFloat(e),r,t)}return new l(i.numberConst,parseInt(e,u),r,t)}_literalString(e){let t="",n=-1,r=this._position,s=this._col,o=this._line;for(;this._currentChar!==-1;){let u=String.fromCharCode(this._pick());if(this._currentChar==c.backslash){switch(u){case"\\":t+="\\";break;case"0":t+="\0";break;case"a":t+="a";break;case"b":t+="\b";break;case"f":t+="\f";break;case"n":t+=`
+`;break;case"r":t+="\r";break;case"t":t+="	";break;case"u":t+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+6),16)),this._jump(4);break;case"v":t+="\v";break;case"x":t+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+4),16)),this._jump(2);break;default:if(String.fromCharCode(e)==u)t+=String.fromCharCode(e);else{this._advance(),n=this._currentChar,t+=String.fromCharCode(this._currentChar),this._advance();continue}}this._jump(2),n=this._currentChar;continue}if(this._currentChar===e&&n!==c.backslash)break;t+=String.fromCharCode(this._currentChar),n=this._currentChar,this._advance()}return new l(i.stringConst,t,o,s)}_skipLineComment(){for(;!this._isLineEnd(this._currentChar)&&this._currentChar!=-1;)this._advance()}_skipComment(){for(;this._currentChar!==-1;){if(this._currentChar===c.star&&this._pick()===c.shebang){this._advance(),this._advance();break}this._advance()}}nextToken(){let e=this._line,t=this._col,n=this._position;for(;this._currentChar!==-1;){if(this._isLineEnd(this._currentChar))return this._line++,this._col=1,this._advance(),new l(i.eol,`
+`,e,t);if(this._isWhiteSpace(this._currentChar)){this._skipWhiteSpace();continue}if(this._currentChar==c.shebang){this._advance(),this._currentChar===c.star?(this._advance(),this._skipComment()):this._skipLineComment();continue}if(this._isDigit(this._currentChar))return this._number();if(this._isIdStart(this._currentChar))return this._id();if(this._currentChar===c.equal)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.eqeq,"==",e,t)):new l(i.equal,"=",e,t);if(this._currentChar===c.great)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.greatEq,">=",e,t)):new l(i.great,">",e,t);if(this._currentChar===c.less)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.lessEq,"<=",e,t)):new l(i.less,"<",e,t);if(this._currentChar===c.semiColon)return this._advance(),new l(i.semi,";",e,t);if(this._currentChar===c.lparen)return this._advance(),new l(i.lparen,"(",e,t);if(this._currentChar===c.rparen)return this._advance(),new l(i.rparen,")",e,t);if(this._currentChar===c.comma)return this._advance(),new l(i.comma,",",e,t);if(this._currentChar===c.lbrace)return this._advance(),new l(i.lbrace,"{",e,t);if(this._currentChar===c.rbrace)return this._advance(),new l(i.rbrace,"}",e,t);if(this._currentChar===c.lbracket)return this._advance(),new l(i.lbracket,"[",e,t);if(this._currentChar===c.rbracket)return this._advance(),new l(i.rbracket,"]",e,t);if(this._currentChar===c.plus)return this._advance(),new l(i.plus,"+",e,t);if(this._currentChar===c.minus)return this._advance(),new l(i.minus,"-",e,t);if(this._currentChar===c.slash)return this._advance(),new l(i.div,"/",e,t);if(this._currentChar===c.star)return this._advance(),new l(i.mult,"*",e,t);if(this._currentChar===c.percent)return this._advance(),new l(i.mod,"%",e,t);if(this._currentChar===c.colon)return this._advance(),new l(i.colon,":",e,t);if(this._currentChar===c.dot)return this._advance(),new l(i.dot,".",e,t);if(this._currentChar===c.not)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.notEq,"!=",e,t)):new l(i.not,"!",e,t);if(this._currentChar===c.and&&this._pick()===c.and)return this._advance(),this._advance(),new l(i.and,"&&",e,t);if(this._currentChar===c.pipe&&this._pick()===c.pipe)return this._advance(),this._advance(),new l(i.or,"||",e,t);if(this._currentChar===c.questionMark&&this._pick()===c.questionMark)return this._advance(),this._advance(),new l(i.nullity,"??",e,t);if(this._currentChar===c.quote||this._currentChar===c.squote){let r=this._currentChar;this._advance();let s=this._literalString(r);return this._advance(),s}return new l(i.invalid,String.fromCharCode(this._currentChar),e,t)}return new l(i.eof,"",e,t)}};k._defaultLanguage=new X("en",{if:"if",else:"else",true:"true",false:"false",null:"null",while:"while",for:"for",with:"with",up:"up",down:"down",till:"till",in:"in",break:"break",continue:"continue",return:"return"}),k.languages=[k._defaultLanguage,new X("fr",{si:"if",sinon:"else",vrai:"true",faux:"false",nul:"null",tanque:"while",pour:"for",avec:"with",mont:"up",desc:"down",jusqua:"till",dans:"in",couper:"break",continuer:"continue",returner:"return"}),new X("bm",{nii:"if",note:"else",tien:"true",galon:"false",gansan:"null",foo:"while",seginka:"for",niin:"with",kay:"up",kaj:"down",kata:"till",kono:"in",tike:"break",ipan:"continue",segin:"return"})],k.RESERVED={if:l.from(i.IF,"if"),else:l.from(i.ELSE,"else"),true:l.from(i.TRUE,!0),false:l.from(i.FALSE,!1),null:l.from(i.NULL,null),for:l.from(i.FOR_LOOP,"for"),while:l.from(i.WHILE_TILL,"while"),with:l.from(i.with,"with"),up:l.from(i.up,"up"),down:l.from(i.down,"down"),till:l.from(i.TILL,"till"),in:l.from(i.in,"in"),break:l.from(i.BREAK,"break"),continue:l.from(i.CONTINUE,"continue"),return:l.from(i.RETURN,"return")};var mt=k,m=class{constructor(e,t){this.line=e,this.col=t}dump(){return this.toString()}},S=class a extends Error{constructor(e,t,n,r,s,o){var u;super(a.format(e,t,n,r)),this.name="MEventoRuntimeError",this.detail=e,this.line=t,this.col=n,this.nodeType=r,this.cause=s,this.code=(u=o==null?void 0:o.code)!=null?u:"runtime_error",this.diagnosticName=o==null?void 0:o.name,this.argCount=o==null?void 0:o.argCount,this.minArgs=o==null?void 0:o.minArgs,this.maxArgs=o==null?void 0:o.maxArgs,this.argIndex=o==null?void 0:o.argIndex,this.expectedType=o==null?void 0:o.expectedType,this.actualType=o==null?void 0:o.actualType,this.stepCount=o==null?void 0:o.stepCount,this.maxSteps=o==null?void 0:o.maxSteps}static fromNode(e,t){if(t instanceof a)return t;let n=t instanceof Error?t.message:String(t);return new a(n,e.line,e.col,e.constructor.name,t)}static format(e,t,n,r){let s=t!=null&&n!=null?` at ${t}:${n}`:"",o=r?` [${r}]`:"";return`MEvento runtime error${s}${o}: ${e}`}diagnostic(){return{code:this.code,message:this.detail,line:this.line,col:this.col,node:this.nodeType,name:this.diagnosticName,argCount:this.argCount,minArgs:this.minArgs,maxArgs:this.maxArgs,argIndex:this.argIndex,expectedType:this.expectedType,actualType:this.actualType,stepCount:this.stepCount,maxSteps:this.maxSteps}}};function g(a,e){var r;let t={name:a,minArgs:e==null?void 0:e.minArgs,maxArgs:e==null?void 0:e.maxArgs,tags:e!=null&&e.tags?Array.from(e.tags):[],args:e!=null&&e.args?e.args.map($t):[],returnType:(r=e==null?void 0:e.returnType)!=null?r:"any"};if(t.minArgs!=null&&t.minArgs<0)throw new Error("minArgs must be greater than or equal to 0");if(t.maxArgs!=null&&t.maxArgs<0)throw new Error("maxArgs must be greater than or equal to 0");let n=J(t);if(n!=null&&t.maxArgs!=null&&n>t.maxArgs)throw new Error("minArgs must be less than or equal to maxArgs");if(!yt.has(t.returnType))throw new Error(`Unsupported return type '${t.returnType}'`);return t}function $t(a){var t,n;let e={name:a.name,type:(t=a.type)!=null?t:"any",required:(n=a.required)!=null?n:!0};if(!Ft.has(e.type))throw new Error(`Unsupported argument type '${e.type}'`);return e}var yt=new Set(["any","null","boolean","number","string","array","object"]),Ft=yt;function Rt(a){var t,n;let e={maxSteps:a==null?void 0:a.maxSteps,trace:(t=a==null?void 0:a.trace)!=null?t:!1,compatV1:(n=a==null?void 0:a.compatV1)!=null?n:!1};if(e.maxSteps!=null&&(!Number.isInteger(e.maxSteps)||e.maxSteps<=0))throw new Error("maxSteps must be a positive integer");return e}function xt(a){var t,n;let e={name:a.name,type:(t=a.type)!=null?t:"any",required:(n=a.required)!=null?n:!0};if(!yt.has(e.type))throw new Error(`Unsupported value type '${e.type}'`);return e}function Vt(a){var e;return{name:a.name,minArgs:a.minArgs,maxArgs:a.maxArgs,tags:a.tags?Array.from(a.tags):[],args:a.args?a.args.map(t=>({...t})):[],returnType:(e=a.returnType)!=null?e:"any"}}function Et(a){return Object.fromEntries(Object.entries(a).map(([e,t])=>[e,Vt(t)]))}function vt(a,e){let t=J(a);return!(t!=null&&e<t||a.maxArgs!=null&&e>a.maxArgs)}function J(a){var n;let e=0;if(a.args){for(let r=a.args.length-1;r>=0;r-=1)if((n=a.args[r].required)==null||n){e=r+1;break}}let t=[a.minArgs,e>0?e:void 0].filter(r=>r!=null);return t.length>0?Math.max(...t):void 0}function gt(a){let e=J(a);return e==null&&a.maxArgs==null?"any number of":e!=null&&a.maxArgs!=null&&e===a.maxArgs?String(e):e!=null&&a.maxArgs!=null?`${e}..${a.maxArgs}`:e!=null?`at least ${e}`:`at most ${a.maxArgs}`}function et(a){return a==null?"null":typeof a=="boolean"?"boolean":typeof a=="number"?"number":typeof a=="string"?"string":Array.isArray(a)?"array":"object"}var q=class extends m{constructor(e,t,n){super(1,1),this.body=e,this.name=t,this.source=n}dump(){let e=`Module ${this.name} Start {`;for(let t of this.body)e+=`${t.dump()}
+`;return e+="}",e}},F=class extends m{constructor(e,t){super(t.line,t.col),this.body=e}toString(){return`{
+${this.body.map(e=>e.toString()).join(`
+`)}}`}},x=class extends m{constructor(e){super(e.line,e.col),this.value=e.value.toString()}toString(){return this.value}},A=class extends m{constructor(e,t){super(e.line,e.col),this.value=e.value,this.raw=t}toString(){return this.value.toString()}},L=class extends m{constructor(e,t){super(e.line,e.col),this.identifier=e,this.init=t}toString(){return`${this.identifier} = ${this.init}`}},G=class extends m{constructor(e){super(e.line,e.col),this.expression=e}toString(){return this.expression.toString()}},j=class extends m{constructor(e,t){super(e.line,e.col),this.callee=e,this.arguments=t}toString(){return`${this.callee.toString()}(...${this.arguments.length})`}},P=class extends m{constructor(e,t,n){super(e.line,e.col),this.left=e,this.operation=t,this.right=n}toString(){return`${this.left} ${this.operation} ${this.right}`}},z=class extends m{constructor(e,t){super(e.line,e.col),this.operation=e,this.argument=t}toString(){return`${this.operation} ${this.argument}`}},U=class extends m{constructor(e,t,n){super(e.line,e.col),this.test=e,this.consequent=t,this.alternate=n}toString(){return`if ${this.test} ${this.consequent} ${this.alternate?`else ${this.alternate} `:""}`}},W=class extends m{constructor(e,t,n){super(e.line,e.col),this.left=e,this.operator=t,this.right=n}toString(){return`${this.left} ${this.operator.value} ${this.right}`}},w=class extends m{constructor(t,n,r=!1){super(t.line,t.col);this.computed=!1;this.owner=t,this.key=n,this.computed=r}toString(){return`${this.owner}[${this.key}]`}},I=class extends m{constructor(e,t,n){super(t==null?void 0:t.line,t==null?void 0:t.col),this.properties=e}toString(){return"{...}"}},$=class extends m{constructor(e,t,n){super(t==null?void 0:t.line,t==null?void 0:t.col),this.elements=e}toString(){return"[...]"}},O=class extends m{constructor(e,t){super(e.line,e.col),this.value=t,this.key=e}},B=class extends m{constructor(t,n,r,s,o=!1){super(r==null?void 0:r.line,r==null?void 0:r.col);this.retain=!1;this.test=t,this.body=n,this.retain=o}},D=class extends m{constructor(t,n,r,s,o,u,p,f=!1){super(u==null?void 0:u.line,u==null?void 0:u.col);this.init=t;this.test=n;this.update=r;this.direction=s;this.body=o;this.retain=f}},K=class extends m{constructor(t,n,r,s,o,u=!1){super(s==null?void 0:s.line,s==null?void 0:s.col);this.identifier=t;this.collection=n;this.body=r;this.retain=u}},N=class extends m{constructor(t,n){super(t.line,t.col);this.first=t;this.second=n}},Z=class extends m{constructor(e,t){super(e,t)}},H=class extends m{constructor(e,t,n){super(t,n),this.value=e}},tt=class extends m{constructor(e,t){super(e,t)}};function qt(a){return a instanceof q?"RootAST":a instanceof F?"BlockStatementAST":a instanceof x?"IdentifierAST":a instanceof A?"LiteralAST":a instanceof L?"AssignmentExpressionAST":a instanceof G?"ExpressionStatementAST":a instanceof j?"CallExpressionAST":a instanceof P?"BinaryExpressionAST":a instanceof z?"UnaryExpressionAST":a instanceof U?"IfStatementAST":a instanceof W?"LogicalExpressionAST":a instanceof w?"IndexAccessorAST":a instanceof I?"ObjectExpression":a instanceof O?"ObjectProperty":a instanceof $?"ArrayExpression":a instanceof B?"WhileLoopStatement":a instanceof D?"ForLoopStatement":a instanceof K?"ForOfStatement":a instanceof N?"TupleExpression":a instanceof Z?"BreakAST":a instanceof H?"ReturnAST":a instanceof tt?"ContinueAST":a.constructor.name}var _t=class{constructor(e=1/0){this.capacity=e;this.storage=[]}push(e){if(this.size()===this.capacity)throw Error("Stack has reached max capacity, you cannot add more items");this.storage.push(e)}pop(){return this.storage.pop()}peek(){return this.storage[this.size()-1]}size(){return this.storage.length}get isEmpty(){return this.storage.length===0}},nt=class nt{constructor(e){this._loopTrack=new _t;this.currentToken=e.nextToken(),this.lexer=e}_eat(e){var t;((t=this.currentToken)==null?void 0:t.type)===e?this.currentToken=this.lexer.nextToken():T(this.currentToken,e)}_eatEOL(){var e;for(;((e=this.currentToken)==null?void 0:e.type)===i.eol;)this._eat(i.eol)}_eatSemiOrEOL(){var e,t;for(;((e=this.currentToken)==null?void 0:e.type)===i.eol||((t=this.currentToken)==null?void 0:t.type)===i.semi;)this._eat(this.currentToken.type)}_eatSemi(){var e;for(;((e=this.currentToken)==null?void 0:e.type)===i.semi;)this._eat(i.semi)}_variable(){let e=new x(this.currentToken);return this._eat(i.id),e}_return(){let e=this.currentToken,t;return!this._expect(i.eol)&&!this._expect(i.semi)&&(t=this._expression()),new H(t,e==null?void 0:e.line,e==null?void 0:e.col)}_factor(){let e=this.currentToken;switch(e.type){case i.plus:case i.minus:case i.not:return this._eat(this.currentToken.type),new z(e,this._term());case i.numberConst:return this._eat(i.numberConst),new A(e,e.value.toString());case i.stringConst:return this._eat(i.stringConst),new A(e,e.value.toString());case i.lparen:this._eat(i.lparen);let t=this._expression();return this._eat(i.rparen),t;case i.TRUE:case i.FALSE:return this._eat(this.currentToken.type),new A(e,e.value.toString());case i.NULL:return this._eat(i.NULL),new A(e,"null");case i.lbracket:return this._arrayExpression();case i.lbrace:return this._objectExpression();case i.IF:return this._ifStatement();case i.WHILE_TILL:return this._whileLoop(!0);case i.FOR_LOOP:return this._forLoop(!0);case i.BREAK:return this._breakExpression();case i.CONTINUE:return this._continueExpression();default:return this._variable()}}_breakExpression(){var e,t;return this._loopTrack.isEmpty&&T(this.currentToken),this._eat(i.BREAK),new Z((e=this.currentToken)==null?void 0:e.line,(t=this.currentToken)==null?void 0:t.col)}_continueExpression(){var e,t;return this._loopTrack.isEmpty&&T(this.currentToken),this._eat(i.CONTINUE),new tt((e=this.currentToken)==null?void 0:e.line,(t=this.currentToken)==null?void 0:t.col)}_term(){let e=this._factor();return e=this._tryParsingFunctionCall(e),e=this._tryParsingMemberExpression(e),e}_expression(){let e=this._term();for(e=this._tryBinaryExpression(0,e);[i.and,i.or,i.nullity].includes(this.currentToken.type);){let t=this.currentToken;this._eat(t.type),e=new W(e,t,this._expression())}if(this._expect(i.equal))if(e instanceof x||e instanceof w){let t=this.currentToken;this._eat(i.equal),e=new L(e,this._expression())}else throw new Error("Unexpected token");return e}_objectProperty(){var r;let e;switch((r=this.currentToken)==null?void 0:r.type){case i.stringConst:{e=new A(this.currentToken,this.currentToken.value),this._eat(i.stringConst);break}case i.lbracket:{this._eat(i.lbracket);var t=this._expression();this._eat(i.rbracket),e=t;break}case i.id:{let s=this._variable();e=new A(new l(i.id,s.value,s.line,s.col),s.value);break}default:throw`Unexpected token ${this.currentToken}`}this._eat(i.colon);var n=this._expression();return new O(e,n)}_property(){return this._objectProperty()}_objectProperties(){var t,n;let e=[];for(((t=this.currentToken)==null?void 0:t.type)!=i.rbrace&&(this._eatEOL(),e.push(this._property()),this._eatEOL());((n=this.currentToken)==null?void 0:n.type)===i.comma&&(this._eat(i.comma),this._eatEOL(),!this._expect(i.rbrace));)e.push(this._property()),this._eatEOL();return e}_objectExpression(e){var t=e!=null?e:this.currentToken;e||this._eat(i.lbrace);var n=this._objectProperties();return this._eat(i.rbrace),new I(n,t,this.currentToken)}_arrayExpression(){this._eat(i.lbracket);let e=this._expect(i.rbracket)?[]:this._expressionsList();this._eat(i.rbracket);var t=e.length!==0?e[0]:void 0,n=e.length!==0?e[e.length-1]:void 0;return new $(e,t,n)}_tryParsingMemberExpression(e){let t=e;for(;this.currentToken.type===i.lbracket||this.currentToken.type===i.dot;)if(this.currentToken.type===i.lbracket){this._eat(i.lbracket);let n=this._expression();t=new w(t,n,!0),this._eat(i.rbracket)}else{this._eat(i.dot);let n=this.currentToken;n.type!==i.id&&T(n);let r=new A(new l(i.stringConst,n.value,n.line,n.col),n.value);this._eat(i.id),t=new w(t,r)}return t}_tryBinaryExpression(e,t){let n=t;for(;;){let r=nt._binopPrecdences[this.currentToken.type]||-1;if(r<e)return n;let s=this.currentToken;this._eat(s.type);let o=this._term(),u=nt._binopPrecdences[this.currentToken.type]||-1;if(r<u){let p=this._tryBinaryExpression(r+1,o);if(p===n)return p;o=p}n=new P(n,s,o)}}_expressionsList(){var n;this._eatEOL();let e=this._expression();this._eatEOL();let t=[e];for(;((n=this.currentToken)==null?void 0:n.type)===i.comma&&(this._eat(i.comma),this._eatEOL(),!this._expect(i.rbracket));)e=this._expression(),t.push(e),this._eatEOL();return t}_callExpression(e){this._eat(i.lparen);let t=[];return this._expect(i.rparen)||(t=this._expressionsList()),this._eat(i.rparen),e instanceof x||T(this.currentToken),new j(e,t)}_tryParsingFunctionCall(e){let t=e;for(;this.currentToken.type===i.lparen;)t=this._callExpression(t);return t}_statementExpression(){let e=this._expression();return[i.semi,i.eol,i.eof].includes(this.currentToken.type)||T(this.currentToken),e}_blockStatement(e=!1){var n;if(e||this._eat(i.lbrace),this._eatEOL(),this._expect(i.rbrace))return this._eat(i.rbrace),new F([],this.currentToken);let t=[this._statement()];for(;this._eatSemiOrEOL(),!(this.currentToken.type===i.rbrace||this.currentToken.type===i.eof||(t.push(this._statement()),this._expect(i.rbrace)));)this.currentToken.type!==i.eol&&this.currentToken.type!==i.semi&&this.currentToken.type!==i.eof&&T(this.currentToken);return this._eat(i.rbrace),((n=this.currentToken)==null?void 0:n.type)===i.rbrace&&this._eat(i.rbrace),new F(t,this.currentToken)}_ifStatement(){this._eat(i.IF);let e=this.currentToken.type===i.lparen;e&&this._eat(i.lparen);let t=this._expression();e&&this._eat(i.rparen);let n;this.currentToken.type===i.lbrace?n=this._blockStatement():n=this._expression();let r;if(this.currentToken.type===i.ELSE)switch(this._eat(i.ELSE),this.currentToken.type){case i.IF:r=this._ifStatement();break;case i.lbrace:r=this._blockStatement();break;default:r=this._expression()}return new U(t,n,r)}_pushLoop(){this._loopTrack.push(!0)}_popLoop(){this._loopTrack.pop()}_whileLoop(e=!1){let t=this.currentToken;this._eat(i.WHILE_TILL),this._pushLoop();let n=this._expression(),r=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();return this._popLoop(),new B(n,r,t,this.currentToken,e)}_forOfIdentifier(){switch(this.currentToken.type){case i.lparen:{this._eat(i.lparen);let e=this._variable();this._eat(i.comma);let t=this._variable();return this._eat(i.rparen),new N(e,t)}default:return this._variable()}}_forLoop(e=!1){let t=this.currentToken;this._eat(i.FOR_LOOP),this._pushLoop();let n=[i.lparen].includes(this.currentToken.type),r;if(n)r=this._forOfIdentifier();else{let s=this._expression();s instanceof L||(n=!0),r=s}if(!n&&r instanceof L){this._eat(i.TILL);let s=this._expression(),o;if(this.currentToken.type===i.up||this.currentToken.type===i.down){let f=this.currentToken;this._eat(f.type),o=f}else o=new l(i.up,"up");let u;this._expect(i.with)?(this._eat(i.with),u=this._expression()):u=new A(new l(i.numberConst,1,this.currentToken.line,this.currentToken.col),"1");let p=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();r=new D(r,s,u,o,p,t,this.currentToken,e),this._popLoop()}else if(n){this._eat(i.in);let s=this._expression(),o=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();r=new K(r,s,o,t,this.currentToken,e),this._popLoop()}else T(this.currentToken);return r}_statement(){switch(this.currentToken.type){case i.BREAK:return this._breakExpression();case i.CONTINUE:return this._continueExpression();case i.RETURN:return this._eat(i.RETURN),this._return();case i.semi:return this._eatSemi(),this._statement();case i.eol:return this._eatEOL(),this._statement();case i.WHILE_TILL:return this._whileLoop();case i.FOR_LOOP:return this._forLoop();default:return this._statementExpression()}}_expect(e){var t;return((t=this.currentToken)==null?void 0:t.type)===e}_definition(){if(this._eatSemiOrEOL(),this._expect(i.eof))return[];let e=[this._statement()];for(;;){if(this._eatSemiOrEOL(),this.currentToken.type===i.eof){this._eat(i.eof);break}this.currentToken.type===i.lbrace?e.push(this._blockStatement()):e.push(this._statement())}return e}_root(){let e=this.lexer.source,t="<module>",n=this._definition();return new q(n,t,e)}parse(){return this._root()}};nt._binopPrecdences={[i.eqeq]:10,[i.notEq]:10,[i.great]:10,[i.greatEq]:10,[i.less]:10,[i.lessEq]:10,[i.plus]:20,[i.minus]:20,[i.mult]:40,[i.div]:40,[i.mod]:40};var dt=nt,R=class{},C=class extends R{},M=class extends R{},y=class{constructor(e){this.value=e}},St=class{constructor(){this._nodesVisitors={}}registerVisitor(e,t){let n=`visit${e.name}`;this._nodesVisitors[n]=t}},ct=class extends St{constructor(){super(),this.registerVisitor(q,this.visitRootAST),this.registerVisitor(F,this.visitBlockStatementAST),this.registerVisitor(x,this.visitIdentifierAST),this.registerVisitor(A,this.visitLiteralAST),this.registerVisitor(L,this.visitAssignmentExpressionAST),this.registerVisitor(G,this.visitExpressionStatementAST),this.registerVisitor(j,this.visitCallExpressionAST),this.registerVisitor(P,this.visitBinaryExpressionAST),this.registerVisitor(z,this.visitUnaryExpressionAST),this.registerVisitor(U,this.visitIfStatementAST),this.registerVisitor(W,this.visitLogicalExpressionAST),this.registerVisitor(w,this.visitIndexAccessorAST),this.registerVisitor(O,this.visitObjectProperty),this.registerVisitor(I,this.visitObjectExpression),this.registerVisitor($,this.visitArrayExpression),this.registerVisitor(B,this.visitWhileLoopStatement),this.registerVisitor(D,this.visitForLoopStatement),this.registerVisitor(K,this.visitForOfStatement),this.registerVisitor(Z,this.visitBreakAST),this.registerVisitor(tt,this.visitContinueAST),this.registerVisitor(H,this.visitReturnAST)}visit(e){this.beforeVisit(e);let t=`visit${e.constructor.name}`,n=this._nodesVisitors[t];if(!n)throw new S(`No ${t} declared`,e.line,e.col,e.constructor.name);try{let r=n.call(this,e);return r&&typeof r.then=="function"?r.catch(s=>{throw S.fromNode(e,s)}):r!=null?r:null}catch(r){throw S.fromNode(e,r)}}beforeVisit(e){}assignProperty(e,t,n){(Array.isArray(e)||typeof e=="object")&&(e[t]=n)}},rt=class{constructor(e,t,n){this.memory={};this.name=e,this.memory=t,this.parent=n}resolve(e){var t,n;return Object.keys(this.memory).includes(e)?this.memory[e]:(n=(t=this.parent)==null?void 0:t.resolve(e))!=null?n:null}change(e,t,n=!0){return Object.keys(this.memory).includes(e)?(this.memory[e]=t,!0):this.parent&&this.parent.change(e,t,!1)?!0:n?(this.memory[e]=t,!0):!1}},st={_ok_:g("_ok_",{name:"_ok_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"boolean"}),_err_:g("_err_",{name:"_err_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"boolean"}),_value_:g("_value_",{name:"_value_",minArgs:1,maxArgs:2,args:[{name:"result"},{name:"fallback",required:!1}],returnType:"any"}),_error_:g("_error_",{name:"_error_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"object"}),_code_:g("_code_",{name:"_code_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"string"}),_message_:g("_message_",{name:"_message_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"string"}),_unwrap_:g("_unwrap_",{name:"_unwrap_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"any"}),_len_:g("_len_",{name:"_len_",minArgs:1,maxArgs:1,args:[{name:"target"}],returnType:"number"}),_push_:g("_push_",{name:"_push_",minArgs:2,maxArgs:2,args:[{name:"array",type:"array"},{name:"value"}],returnType:"array"}),_pop_:g("_pop_",{name:"_pop_",minArgs:1,maxArgs:1,args:[{name:"array",type:"array"}],returnType:"any"}),_insert_:g("_insert_",{name:"_insert_",minArgs:3,maxArgs:3,args:[{name:"array",type:"array"},{name:"index",type:"number"},{name:"value"}],returnType:"array"}),_remove_at_:g("_remove_at_",{name:"_remove_at_",minArgs:2,maxArgs:2,args:[{name:"array",type:"array"},{name:"index",type:"number"}],returnType:"any"}),_has_:g("_has_",{name:"_has_",minArgs:2,maxArgs:2,args:[{name:"object",type:"object"},{name:"key"}],returnType:"boolean"}),_keys_:g("_keys_",{name:"_keys_",minArgs:1,maxArgs:1,args:[{name:"object",type:"object"}],returnType:"array"}),_values_:g("_values_",{name:"_values_",minArgs:1,maxArgs:1,args:[{name:"object",type:"object"}],returnType:"array"})};function at(a){return typeof a=="object"&&a!=null&&a.ok===!0}function ut(a){if(typeof a!="object"||a==null)return;let e=a;if(!(e.ok!==!1||typeof e.error!="object"||e.error==null))return e.error}function V(a){return typeof a=="number"?a:void 0}function Q(a){return typeof a=="string"?a:void 0}function jt(a){var t,n;let e=ut(a);return new S((t=Q(e==null?void 0:e.message))!=null?t:"Cannot unwrap failed _try_ result",V(e==null?void 0:e.line),V(e==null?void 0:e.col),Q(e==null?void 0:e.node),void 0,{code:(n=Q(e==null?void 0:e.code))!=null?n:"invalid_try_result",name:Q(e==null?void 0:e.name),argCount:V(e==null?void 0:e.argCount),minArgs:V(e==null?void 0:e.minArgs),maxArgs:V(e==null?void 0:e.maxArgs),argIndex:V(e==null?void 0:e.argIndex),expectedType:Q(e==null?void 0:e.expectedType),actualType:Q(e==null?void 0:e.actualType),stepCount:V(e==null?void 0:e.stepCount),maxSteps:V(e==null?void 0:e.maxSteps)})}function ht(a,e,t,n){let r=et(n);return new S(`Function '${a}' argument ${e} expects ${t}, got ${r}`,void 0,void 0,void 0,void 0,{code:"invalid_argument_type",name:a,argIndex:e,expectedType:t,actualType:r})}function ot(a,e,t){let n=e[t];if(Array.isArray(n))return n;throw ht(a,t,"array",n)}function ft(a,e,t){let n=e[t];if(typeof n=="object"&&n!=null&&!Array.isArray(n))return n;throw ht(a,t,"object",n)}function wt(a,e,t){let n=e[t];if(typeof n=="number")return Math.trunc(n);throw ht(a,t,"number",n)}function Pt(a,e,t){return new S(`Function '${a}' index ${e} is out of range for array of length ${t}`,void 0,void 0,void 0,void 0,{code:"index_out_of_range",name:a})}var zt={_ok_:a=>at(a[0]),_err_:a=>!at(a[0]),_value_:a=>{var e,t;return at(a[0])?(e=a[0].value)!=null?e:null:(t=a[1])!=null?t:null},_error_:a=>{var e;return(e=ut(a[0]))!=null?e:null},_code_:a=>{var e,t;return(t=(e=ut(a[0]))==null?void 0:e.code)!=null?t:null},_message_:a=>{var e,t;return(t=(e=ut(a[0]))==null?void 0:e.message)!=null?t:null},_unwrap_:a=>{var e;if(at(a[0]))return(e=a[0].value)!=null?e:null;throw jt(a[0])},_len_:a=>{let e=a[0];if(Array.isArray(e)||typeof e=="string")return e.length;if(typeof e=="object"&&e!=null)return Object.keys(e).length;throw ht("_len_",0,"array|object|string",e)},_push_:a=>{var t;let e=ot("_push_",a,0);return e.push((t=a[1])!=null?t:null),e},_pop_:a=>{var t;let e=ot("_pop_",a,0);return e.length===0?null:(t=e.pop())!=null?t:null},_insert_:a=>{var n;let e=ot("_insert_",a,0),t=wt("_insert_",a,1);if(t<0||t>e.length)throw Pt("_insert_",t,e.length);return e.splice(t,0,(n=a[2])!=null?n:null),e},_remove_at_:a=>{var n;let e=ot("_remove_at_",a,0),t=wt("_remove_at_",a,1);return t<0||t>=e.length?null:(n=e.splice(t,1)[0])!=null?n:null},_has_:a=>Object.prototype.hasOwnProperty.call(ft("_has_",a,0),a[1]),_keys_:a=>Object.keys(ft("_keys_",a,0)),_values_:a=>Object.values(ft("_values_",a,0))},d=class d extends ct{constructor(t){super();this.rootScope=new rt("Program",{});this.currentScope=this.rootScope;this.debug=!1;this._functionsRegistry={};this._functionSpecs={};this._executionStepCount=0;this._traceEvents=[];this._options=Rt(t),this._functionsRegistry={...zt,...d._globalFunctionsRegistry},this._functionSpecs={...st,...d._globalFunctionSpecs}}get options(){return{...this._options}}get executionStepCount(){return this._executionStepCount}trace(){return this._traceEvents.map(t=>({...t,detail:{...t.detail}}))}resetExecutionBudget(){this._executionStepCount=0}beforeVisit(t){this._executionStepCount+=1,this.recordTrace("visit",t);let n=this._options.maxSteps;if(n!=null&&this._executionStepCount>n)throw new S(`Execution budget exceeded after ${this._executionStepCount} step(s)`,t.line,t.col,t.constructor.name,void 0,{code:"execution_budget_exceeded",stepCount:this._executionStepCount,maxSteps:n})}clearTrace(){this._traceEvents=[]}recordTrace(t,n,r,s={}){this._options.trace&&this._traceEvents.push({kind:t,line:n.line,col:n.col,node:qt(n),name:r,stepCount:this._executionStepCount,detail:s})}resolve(t){var n,r;return(r=(n=this.currentScope)==null?void 0:n.resolve(t))!=null?r:null}changeVariable(t,n){var r;return(r=this.currentScope)!=null&&r.change(t,n)?n:null}pushScope(t){let n=new rt(t,{},this.currentScope);this.currentScope=n}popScope(){var t;this.currentScope=(t=this.currentScope)==null?void 0:t.parent}log(t){this.debug&&console.log(t)}successResult(t){return{ok:!0,value:t,error:null}}errorResult(t){return{ok:!1,value:null,error:t.diagnostic()}}visitRootAST(t){var s;let n=t.body,r;for(let o of n)if(r=this.visit(o),r instanceof y)return(s=r.value)!=null?s:null;return r!=null?r:null}visitBlockStatementAST(t){let n=t.body,r;this.pushScope("Block");for(let s of n)if(r=this.visit(s),r instanceof R||r instanceof y)break;return this.popScope(),r!=null?r:null}visitIdentifierAST(t){var r;let n=t.value;return(r=this==null?void 0:this.resolve(n))!=null?r:null}visitLiteralAST(t){return t.value}visitAssignmentExpressionAST(t){let n=t.identifier,r=t.init,s=null;if(n instanceof w){var o=this.visit(n.owner);s=this.visit(t.init);var u=this.visit(n.key);this.assignProperty(o,u,s)}else n instanceof x&&(s=this.visit(r),this.changeVariable(n.value,s));return s}visitExpressionStatementAST(t){let n=t.expression;return this.visit(n)}visitCallExpressionAST(t){var v,_;let n=t.callee,r=t.arguments,s=n.value;if(s==="_try_"){if(r.length!==1)throw new S("_try_ expects exactly one expression",t.line,t.col,t.constructor.name,void 0,{code:"invalid_try_arity",name:"_try_",argCount:r.length,minArgs:1,maxArgs:1});try{let E=this.visit(r[0]);return E instanceof R||E instanceof y?E:this.successResult(E)}catch(E){if(E instanceof S)return this.errorResult(E);throw E}}let o=this.resolveFunction(s);if(!o){if(this._options.compatV1)return null;throw new S(`Unknown function '${s}'`,t.line,t.col,t.constructor.name,void 0,{code:"unknown_function",name:s})}let u=this.resolveFunctionSpec(s);if(u&&!vt(u,r.length))throw new S(`Function '${s}' expects ${gt(u)} argument(s), got ${r.length}`,t.line,t.col,t.constructor.name,void 0,{code:"invalid_function_arity",name:s,argCount:r.length,minArgs:J(u),maxArgs:u.maxArgs});let p=r.map(E=>this.visit(E));u&&this.validateRuntimeArgumentTypes(t,u,p),this.recordTrace("call",t,s,{argCount:p.length,returnType:(v=u==null?void 0:u.returnType)!=null?v:"any"});let f=o(p,this);return this.recordTrace("call_result",t,s,{returnType:(_=u==null?void 0:u.returnType)!=null?_:"any",actualType:et(f)}),f}visitBinaryExpressionAST(t){let n=t.left,r=t.right,s=t.operation,o=this.visit(n),u=this.visit(r);switch(s.type){case i.plus:return h(o)&&h(u)?o+u:`${o}${u}`;case i.minus:if(h(o)&&h(u))return o-u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.mult:if(h(o)&&h(u))return o*u;if(Y(o)&&h(u))return o.repeat(u);if(h(o)&&Y(u))return u.repeat(o);throw new Error(`Operation ${s.value} not allowed no num value`);case i.div:if(h(o)&&h(u)){if(u===0)throw new Error("Invalid division by 0");return o/u}throw new Error(`Operation ${s.value} not allowed no num value`);case i.mod:if(h(o)&&h(u))return o%u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.great:if(h(o)&&h(u))return o>u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.greatEq:if(h(o)&&h(u))return o>=u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.less:if(h(o)&&h(u))return o<u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.lessEq:if(h(o)&&h(u))return o<=u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.eqeq:return o===u;case i.notEq:return o!==u;default:throw new Error(`Operation ${s.value} not allowed no num value`)}}visitUnaryExpressionAST(t){let n=t.argument,r=t.operation,s=this.visit(n);if(r.type===i.not)return b(s)===!1;if(!h(s))throw new Error(`Operation ${r.value} not allowed no num value`);if(r.type===i.plus)return s;if(r.type===i.minus)return-s;throw new Error(`Operation ${r.value} not allowed no num value`)}visitIfStatementAST(t){let n=t.test,r=this.visit(n);return b(r)?this.visit(t.consequent):t.alternate?this.visit(t.alternate):null}visitLogicalExpressionAST(t){let n=t.left,r=this.visit(n);if(t.operator.type===i.nullity)return r!=null?r:this.visit(t.right);let s=b(r);return t.operator.type===i.and?s?b(this.visit(t.right)):!1:t.operator.type===i.or?s?!0:b(this.visit(t.right)):null}visitIndexAccessorAST(t){var s,o;let n=t.owner,r=this.visit(n);if(r==null)return null;if(Array.isArray(r)){let u=this.visit(t.key);return h(u)&&Number.isInteger(u)&&r.length>u&&u>=0&&(s=r[u])!=null?s:null}else if(typeof r=="object"){let u=this.visit(t.key);return(o=r[u])!=null?o:null}return null}visitObjectProperty(t){}visitObjectExpression(t){let n={},r=t;for(let s of r.properties)if(s instanceof O){let o=this.visit(s.key);o=Y(o)?o:o.toString(),n[o]=this.visit(s.value)}return n}visitArrayExpression(t){let n=t;return this.resolveArguments(n.elements)}visitBreakAST(t){return new C}visitWhileLoopStatement(t){this.log(`WhileLoopStatement ${t.test} ${t.body}`);let n=t.retain?[]:void 0;for(;b(this.visit(t.test));){let r=this.visit(t.body);if(r instanceof C)break;if(!(r instanceof M)){if(r instanceof y)return this.popScope(),r;n==null||n.push(r)}}return n!=null?n:null}visitForLoopStatement(t){let n=t.retain?[]:void 0,r=t.init.identifier;if(!(r instanceof x))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let s=this.visit(t.init.init);this.changeVariable(r.value,s);let o=()=>{let p=this.visit(t.test);if(h(p)){let f=this.resolve(r.value);return t.direction.type===i.up?p>=f:p<=f}return b(p)},u=()=>{let p=this.visit(t.update);if(h(p)){let f=this.resolve(r.value);if(!h(f))throw Error("Cant update value");this.changeVariable(r.value,t.direction.type===i.up?f+p:f-p)}else throw Error("Update value cant be non number")};for(;o();){let p=this.visit(t.body);if(p instanceof C)break;if(p instanceof M){u();continue}if(p instanceof y)return this.popScope(),p;n==null||n.push(p),u()}return this.popScope(),n!=null?n:null}visitForOfStatement(t){let n=this.visit(t.collection);if(!Array.isArray(n))throw Error("Can iterate non array object");let r=t.retain?[]:void 0;this.pushScope("ForOfStatement");for(let s of n){this._declareForIdentifier(t.identifier,s);let o=this.visit(t.body);if(o instanceof C)break;if(!(o instanceof M)){if(o instanceof y)return this.popScope(),o;r==null||r.push(o)}}return this.popScope(),r!=null?r:null}visitContinueAST(t){return new M}visitReturnAST(t){return new y(t.value!=null?this.visit(t.value):null)}_declareForIdentifier(t,n){if(t instanceof N){if(!Array.isArray(n))throw Error("Unable to make a tuple from non Array element");this.changeVariable(t.first.value,n[0]),this.changeVariable(t.second.value,n[1])}this.changeVariable(t.value,n)}resolveArguments(t){return t.map(n=>this.visit(n))}setFunctionResolver(t){this._functionResolver=t}resolveFunction(t){var n,r;return(r=this._functionsRegistry[t])!=null?r:(n=this._functionResolver)==null?void 0:n.call(this,t)}resolveFunctionSpec(t){return this._functionSpecs[t]}capabilities(){return Et(this._functionSpecs)}registerFunction(t,n,r){this._functionsRegistry[t]=n,this._functionSpecs[t]=g(t,r)}unregisterFunction(t){delete this._functionsRegistry[t],delete this._functionSpecs[t]}validate(t,n,r=!1){let s=[],o=this.validationFunctionSpecs(n);try{this.validateNode(d.compile(t,r),o,s)}catch(u){s.push({code:"syntax_error",message:u instanceof Error?u.message:String(u)})}return{ok:s.length===0,errors:s}}validateManifest(t,n,r=!1){let s=[],o=this.validationFunctionSpecs(n.functions);try{let u=d.compile(t,r);this.validateNode(u,o,s),this.validateManifestNode(u,n,s)}catch(u){s.push({code:"syntax_error",message:u instanceof Error?u.message:String(u)})}return{ok:s.length===0,errors:s}}validationFunctionSpecs(t){let n=new Map;return Object.keys(st).forEach(r=>{var s;return n.set(r,(s=this._functionSpecs[r])!=null?s:st[r])}),t==null?(Object.keys(this._functionSpecs).forEach(r=>n.set(r,this._functionSpecs[r])),n):t instanceof Set?(t.forEach(r=>{var s;return n.set(r,(s=this._functionSpecs[r])!=null?s:g(r))}),n):Array.isArray(t)?(t.forEach(r=>{var s;typeof r=="string"?n.set(r,(s=this._functionSpecs[r])!=null?s:g(r)):n.set(r.name,g(r.name,r))}),n):(Object.keys(t).forEach(r=>n.set(r,g(r,t[r]))),n)}validateNode(t,n,r,s=!1){t&&(t instanceof q||t instanceof F?t.body.forEach(o=>this.validateNode(o,n,r,s)):t instanceof L?(this.validateNode(t.identifier,n,r,s),this.validateNode(t.init,n,r,s)):t instanceof G?this.validateNode(t.expression,n,r,s):t instanceof j?this.validateCallExpression(t,n,r,s):t instanceof P?(this.validateNode(t.left,n,r,s),this.validateNode(t.right,n,r,s)):t instanceof z?this.validateNode(t.argument,n,r,s):t instanceof U?(this.validateNode(t.test,n,r,s),this.validateNode(t.consequent,n,r,s),this.validateNode(t.alternate,n,r,s)):t instanceof W?(this.validateNode(t.left,n,r,s),this.validateNode(t.right,n,r,s)):t instanceof w?(this.validateNode(t.owner,n,r,s),this.validateNode(t.key,n,r,s)):t instanceof I?t.properties.forEach(o=>this.validateNode(o,n,r,s)):t instanceof O?(this.validateNode(t.key,n,r,s),this.validateNode(t.value,n,r,s)):t instanceof $?t.elements.forEach(o=>this.validateNode(o,n,r,s)):t instanceof B?(this.validateNode(t.test,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof D?(this.validateNode(t.init,n,r,s),this.validateNode(t.test,n,r,s),this.validateNode(t.update,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof K?(this.validateNode(t.identifier,n,r,s),this.validateNode(t.collection,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof N?(this.validateNode(t.first,n,r,s),this.validateNode(t.second,n,r,s)):t instanceof H&&this.validateNode(t.value,n,r,s))}validateCallExpression(t,n,r,s){let o=t.callee.value;if(o==="_try_"){t.arguments.length!==1&&r.push(this.validationError("invalid_try_arity",t,"_try_ expects exactly one expression","_try_",{argCount:t.arguments.length,minArgs:1,maxArgs:1})),t.arguments.forEach(u=>this.validateNode(u,n,r,!0));return}if(!s){let u=n.get(o);u?vt(u,t.arguments.length)?this.validateStaticArgumentTypes(t,u,r):r.push(this.validationError("invalid_function_arity",t,`Function '${o}' expects ${gt(u)} argument(s), got ${t.arguments.length}`,o,{argCount:t.arguments.length,minArgs:J(u),maxArgs:u.maxArgs})):this._options.compatV1||r.push(this.validationError("unknown_function",t,`Unknown function '${o}'`,o))}t.arguments.forEach(u=>this.validateNode(u,n,r,s))}validateStaticArgumentTypes(t,n,r){var s;(s=n.args)==null||s.forEach((o,u)=>{var v,_;let p=t.arguments[u];if(!p)return;let f=this.staticArgumentType(p);!f||this.argumentTypeMatches(o,f)||r.push(this.validationError("invalid_argument_type",t,`Function '${n.name}' argument ${u} expects ${(v=o.type)!=null?v:"any"}, got ${f}`,n.name,{argIndex:u,expectedType:(_=o.type)!=null?_:"any",actualType:f}))})}staticArgumentType(t){if(t instanceof A)return et(t.value);if(t instanceof $)return"array";if(t instanceof I)return"object"}argumentTypeMatches(t,n){var s;let r=(s=t.type)!=null?s:"any";return r==="any"||t.required===!1&&n==="null"?!0:r===n}validateManifestNode(t,n,r){var p,f;let s=((p=n.inputs)!=null?p:[]).map(xt),o=((f=n.outputs)!=null?f:[]).map(xt),u={knownInputs:new Set(s.map(v=>v.name)),assigned:new Set,assignedTypes:new Map,reportedInputs:new Set};this.analyzeManifestNode(t,u,r),o.forEach(v=>{var E,At,bt;if(((E=v.required)==null||E)&&!u.assigned.has(v.name)){r.push(this.validationError("missing_output",t,`Required output '${v.name}' is not assigned`,v.name));return}let _=u.assignedTypes.get(v.name);!_||this.valueSpecTypeMatches(v,_)||r.push(this.validationError("invalid_output_type",t,`Output '${v.name}' expects ${(At=v.type)!=null?At:"any"}, got ${_}`,v.name,{expectedType:(bt=v.type)!=null?bt:"any",actualType:_}))})}analyzeManifestNode(t,n,r){t&&(t instanceof q||t instanceof F?t.body.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof L?(this.analyzeManifestNode(t.init,n,r),t.identifier instanceof w&&this.analyzeManifestNode(t.identifier,n,r),this.markAssignedTarget(t.identifier,this.staticArgumentType(t.init),n)):t instanceof G?this.analyzeManifestNode(t.expression,n,r):t instanceof j?t.arguments.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof P?(this.analyzeManifestNode(t.left,n,r),this.analyzeManifestNode(t.right,n,r)):t instanceof z?this.analyzeManifestNode(t.argument,n,r):t instanceof U?(this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.consequent,n,r),this.analyzeManifestNode(t.alternate,n,r)):t instanceof W?(this.analyzeManifestNode(t.left,n,r),this.analyzeManifestNode(t.right,n,r)):t instanceof w?(this.analyzeManifestNode(t.owner,n,r),this.analyzeManifestNode(t.key,n,r)):t instanceof I?t.properties.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof O?(this.analyzeManifestNode(t.key,n,r),this.analyzeManifestNode(t.value,n,r)):t instanceof $?t.elements.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof B?(this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.body,n,r)):t instanceof D?(this.analyzeManifestNode(t.init,n,r),this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.body,n,r),this.analyzeManifestNode(t.update,n,r)):t instanceof K?(this.analyzeManifestNode(t.collection,n,r),this.markAssignedTarget(t.identifier,void 0,n),this.analyzeManifestNode(t.body,n,r)):t instanceof N?(this.analyzeManifestNode(t.first,n,r),this.analyzeManifestNode(t.second,n,r)):t instanceof H?this.analyzeManifestNode(t.value,n,r):t instanceof x&&!n.knownInputs.has(t.value)&&!n.assigned.has(t.value)&&!n.reportedInputs.has(t.value)&&(n.reportedInputs.add(t.value),r.push(this.validationError("unknown_input",t,`Unknown input '${t.value}'`,t.value))))}markAssignedTarget(t,n,r){t instanceof x?(r.assigned.add(t.value),n&&r.assignedTypes.set(t.value,n)):t instanceof N&&(this.markAssignedTarget(t.first,void 0,r),this.markAssignedTarget(t.second,void 0,r))}valueSpecTypeMatches(t,n){var s;let r=(s=t.type)!=null?s:"any";return r==="any"||t.required===!1&&n==="null"?!0:r===n}validationError(t,n,r,s,o){return{code:t,message:r,name:s,line:n.line,col:n.col,node:n.constructor.name,argCount:o==null?void 0:o.argCount,minArgs:o==null?void 0:o.minArgs,maxArgs:o==null?void 0:o.maxArgs,argIndex:o==null?void 0:o.argIndex,expectedType:o==null?void 0:o.expectedType,actualType:o==null?void 0:o.actualType}}validateRuntimeArgumentTypes(t,n,r){var s;(s=n.args)==null||s.forEach((o,u)=>{var f,v;if(u>=r.length)return;let p=et(r[u]);if(!this.argumentTypeMatches(o,p))throw new S(`Function '${n.name}' argument ${u} expects ${(f=o.type)!=null?f:"any"}, got ${p}`,t.line,t.col,t.constructor.name,void 0,{code:"invalid_argument_type",name:n.name,argIndex:u,expectedType:(v=o.type)!=null?v:"any",actualType:p})})}execute(t,n=!0,r){let s=d.compile(t,n);return r&&Object.keys(r).forEach(o=>this.changeVariable(o,r[o])),this.resetExecutionBudget(),this.clearTrace(),this.visit(s)}static compile(t,n=!1){let r=It(t);if(n&&this._cache.has(r))return this._cache.get(r);let s=new mt(t),u=new dt(s).parse();return n&&this._cache.set(r,u),u}static register(t,n,r){d._globalFunctionsRegistry[t]=n,d._globalFunctionSpecs[t]=g(t,r)}static unregister(t){delete d._globalFunctionsRegistry[t],delete d._globalFunctionSpecs[t]}static capabilities(){return Et({...st,...d._globalFunctionSpecs})}static validateSource(t,n,r=!1){return new d().validate(t,n,r)}static validateManifestSource(t,n,r=!1){return new d().validateManifest(t,n,r)}static run(t,n=!1,r,s){return new d(s).execute(t,n,r)}static newInstance(t){return new d(t)}clone(){var t=new d(this.options);return t._functionsRegistry={...this._functionsRegistry},t._functionSpecs={...this._functionSpecs},t.rootScope.memory={...this.rootScope.memory},t}newAsyncInstance(){let t=lt.newInstance(this.options);return t.rootScope.memory=this.rootScope.memory,t._functionsRegistry=this._functionsRegistry,t._functionSpecs=this._functionSpecs,t}};d._globalFunctionsRegistry={},d._globalFunctionSpecs={},d._cache=new Map;var it=d,lt=class a extends it{constructor(e){super(e)}async visitRootAST(e){var r;let t=e.body,n;for(let s of t)if(n=await this.visit(s),n instanceof y)return(r=n.value)!=null?r:null;return n!=null?n:null}async visitBlockStatementAST(e){let t=e.body,n;this.pushScope("Block");for(let r of t)if(n=await this.visit(r),n instanceof R||n instanceof y)break;return this.popScope(),n}async visitIdentifierAST(e){let t=e.value;return this.resolve(t)}async visitLiteralAST(e){return e.value}async visitAssignmentExpressionAST(e){let t=e.identifier,n=e.init,r=null;if(t instanceof w){var s=await this.visit(t.owner);r=await this.visit(e.init);var o=await this.visit(t.key);this.assignProperty(s,o,r)}else t instanceof x&&(r=await this.visit(n),this.changeVariable(t.value,r));return r}async visitExpressionStatementAST(e){let t=e.expression;return await this.visit(t)}async visitCallExpressionAST(e){var f,v;let t=e.callee,n=e.arguments,r=t.value;if(r==="_try_"){if(n.length!==1)throw new S("_try_ expects exactly one expression",e.line,e.col,e.constructor.name,void 0,{code:"invalid_try_arity",name:"_try_",argCount:n.length,minArgs:1,maxArgs:1});try{let _=await this.visit(n[0]);return _ instanceof R||_ instanceof y?_:this.successResult(_)}catch(_){if(_ instanceof S)return this.errorResult(_);throw _}}let s=this.resolveFunction(r);if(!s){if(this._options.compatV1)return null;throw new S(`Unknown function '${r}'`,e.line,e.col,e.constructor.name,void 0,{code:"unknown_function",name:r})}let o=this.resolveFunctionSpec(r);if(o&&!vt(o,n.length))throw new S(`Function '${r}' expects ${gt(o)} argument(s), got ${n.length}`,e.line,e.col,e.constructor.name,void 0,{code:"invalid_function_arity",name:r,argCount:n.length,minArgs:J(o),maxArgs:o.maxArgs});let u=await Promise.all(n.map(_=>this.visit(_)));o&&this.validateRuntimeArgumentTypes(e,o,u),this.recordTrace("call",e,r,{argCount:u.length,returnType:(f=o==null?void 0:o.returnType)!=null?f:"any"});let p=await s(u,this);return this.recordTrace("call_result",e,r,{returnType:(v=o==null?void 0:o.returnType)!=null?v:"any",actualType:et(p)}),p}async visitBinaryExpressionAST(e){let t=e.left,n=e.right,r=e.operation,s=await this.visit(t),o=await this.visit(n);switch(r.type){case i.plus:return h(s)&&h(o)?s+o:`${s}${o}`;case i.minus:if(h(s)&&h(o))return s-o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.mult:if(h(s)&&h(o))return s*o;if(Y(s)&&h(o))return s.repeat(o);if(h(s)&&Y(o))return o.repeat(s);throw new Error(`Operation ${r.value} not allowed no num value`);case i.div:if(h(s)&&h(o)){if(o===0)throw new Error("Invalid division by 0");return s/o}throw new Error(`Operation ${r.value} not allowed no num value`);case i.mod:if(h(s)&&h(o))return s%o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.great:if(h(s)&&h(o))return s>o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.greatEq:if(h(s)&&h(o))return s>=o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.less:if(h(s)&&h(o))return s<o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.lessEq:if(h(s)&&h(o))return s<=o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.eqeq:return s===o;case i.notEq:return s!==o;default:throw new Error(`Operation ${r.value} not allowed no num value`)}}async visitUnaryExpressionAST(e){let t=e.argument,n=e.operation,r=await this.visit(t);if(n.type===i.not)return b(r)===!1;if(!h(r))throw new Error(`Operation ${n.value} not allowed no num value`);if(n.type===i.plus)return r;if(n.type===i.minus)return-r;throw new Error(`Operation ${n.value} not allowed no num value`)}async visitIfStatementAST(e){let t=e.test,n=await this.visit(t);return b(n)?await this.visit(e.consequent):e.alternate?await this.visit(e.alternate):null}async visitLogicalExpressionAST(e){let t=e.left,n=await this.visit(t);if(e.operator.type===i.nullity)return n!=null?n:await this.visit(e.right);let r=b(n);return e.operator.type===i.and?r?b(await this.visit(e.right)):!1:e.operator.type===i.or?r?!0:b(await this.visit(e.right)):!1}async visitIndexAccessorAST(e){var r,s;let t=e.owner,n=await this.visit(t);if(n==null)return null;if(Array.isArray(n)){let o=await this.visit(e.key);return h(o)&&Number.isInteger(o)&&n.length>o&&o>=0&&(r=n[o])!=null?r:null}else if(typeof n=="object"){let o=await this.visit(e.key);return(s=n[o])!=null?s:null}return null}async visitObjectProperty(e){}async visitObjectExpression(e){let t={},n=e;for(let r of n.properties)if(r instanceof O){let s=await this.visit(r.key);s=Y(s)?s:s.toString(),t[s]=await this.visit(r.value)}return t}async visitArrayExpression(e){let t=e;return await this.resolveArgumentsAsync(t.elements)}async visitWhileLoopStatement(e){this.log(`WhileLoopStatement ${e.test} ${e.body}`);let t=e.retain?[]:void 0;for(;b(await this.visit(e.test));){let n=await this.visit(e.body);if(n instanceof C)break;if(!(n instanceof M)){if(n instanceof y)return this.popScope(),n;t==null||t.push(n)}}return t}async visitForLoopStatement(e){let t=e.retain?[]:void 0,n=e.init.identifier;if(!(n instanceof x))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let r=await this.visit(e.init.init);this.changeVariable(n.value,r);let s=async()=>{let u=await this.visit(e.test);if(h(u)){let p=this.resolve(n.value);return e.direction.type===i.up?u>=p:u<=p}return b(u)},o=async()=>{let u=await this.visit(e.update);if(h(u)){let p=this.resolve(n.value);if(!h(p))throw Error("Cant update value");this.changeVariable(n.value,e.direction.type===i.up?p+u:p-u)}else throw Error("Update value cant be non number")};for(;await s();){let u=await this.visit(e.body);if(u instanceof C)break;if(u instanceof M){await o();continue}if(u instanceof y)return this.popScope(),u;t==null||t.push(u),await o()}return this.popScope(),t!=null?t:null}async visitForOfStatement(e){let t=await this.visit(e.collection);if(!Array.isArray(t))throw Error("Can iterate non array object");let n=e.retain?[]:void 0;this.pushScope("ForOfStatement");for(let r of t){this._declareForIdentifier(e.identifier,r);let s=await this.visit(e.body);if(s instanceof C)break;if(!(s instanceof M)){if(s instanceof y)return this.popScope(),s;n==null||n.push(s)}}return this.popScope(),n}async visitReturnAST(e){return new y(e.value!=null?await this.visit(e.value):null)}async resolveArgumentsAsync(e){return await Promise.all(e.map(async t=>await this.visit(t)))}registerFunction(e,t,n){this._functionsRegistry[e]=t,this._functionSpecs[e]=g(e,n)}unregisterFunction(e){delete this._functionsRegistry[e],delete this._functionSpecs[e]}async execute(e,t=!0,n){let r=it.compile(e,t);return n&&Object.keys(n).forEach(s=>this.changeVariable(s,n[s])),this.resetExecutionBudget(),this.clearTrace(),await this.visit(r)}static async run(e,t=!1,n,r){return await new a(r).execute(e,t,n)}static newInstance(e){return new a(e)}clone(){var e=new a(this.options);return e._functionsRegistry={...this._functionsRegistry},e._functionSpecs={...this._functionSpecs},e.rootScope.memory={...this.rootScope.memory},e}};0&&(module.exports={AST,ArrayExpression,AssignmentExpressionAST,BinaryExpressionAST,BlockStatementAST,BreakAST,BreakBranch,CallExpressionAST,ContinueAST,ContinueBranch,ExpressionStatementAST,ForLoopStatement,ForOfStatement,IdentifierAST,IfStatementAST,IndexAccessorAST,LexerDictionary,LiteralAST,LogicalExpressionAST,LoopControl,MEventScope,MEvento,MEventoAsync,MEventoRuntimeError,NodeVisitor,ObjectExpression,ObjectProperty,ReturnAST,ReturnBranch,RootAST,Token,TokenType,TupleExpression,UnaryExpressionAST,WhileLoopStatement});

package/dist/esm/index.d.mts

@@ -45,6 +45,7 @@ declare class TokenType {
     static CONTINUE: number;
     static nullity: number;
     static RETURN: number;
+    static dot: number;
 }
 declare class Token {
     type: number;
@@ -73,6 +74,90 @@ declare abstract class AST {
     constructor(line?: number, col?: number);
     dump(): string;
 }
+declare class MEventoRuntimeError extends Error {
+    line?: number;
+    col?: number;
+    nodeType?: string;
+    cause?: unknown;
+    detail: string;
+    code: string;
+    diagnosticName?: string;
+    argCount?: number;
+    minArgs?: number;
+    maxArgs?: number;
+    argIndex?: number;
+    expectedType?: string;
+    actualType?: string;
+    stepCount?: number;
+    maxSteps?: number;
+    constructor(detail: string, line?: number, col?: number, nodeType?: string, cause?: unknown, diagnostic?: Partial<Omit<MEventoDiagnostic, "message" | "line" | "col" | "node">>);
+    static fromNode(node: AST, error: unknown): MEventoRuntimeError;
+    private static format;
+    diagnostic(): MEventoDiagnostic;
+}
+type MEventoDiagnostic = {
+    code: string;
+    message: string;
+    name?: string;
+    line?: number;
+    col?: number;
+    node?: string;
+    argCount?: number;
+    minArgs?: number;
+    maxArgs?: number;
+    argIndex?: number;
+    expectedType?: string;
+    actualType?: string;
+    stepCount?: number;
+    maxSteps?: number;
+};
+type MEventoValidationError = MEventoDiagnostic;
+type MEventoValidationResult = {
+    ok: boolean;
+    errors: MEventoValidationError[];
+};
+type MEventoFunctionSpec = {
+    name: string;
+    minArgs?: number;
+    maxArgs?: number;
+    tags?: Iterable<string>;
+    args?: MEventoArgSpec[];
+    returnType?: string;
+};
+type MEventoArgSpec = {
+    name: string;
+    type?: string;
+    required?: boolean;
+};
+type MEventoOptions = {
+    maxSteps?: number;
+    trace?: boolean;
+    compatV1?: boolean;
+};
+type MEventoValueSpec = {
+    name: string;
+    type?: string;
+    required?: boolean;
+};
+type MEventoScriptManifest = {
+    functions?: MEventoFunctionList;
+    inputs?: MEventoValueSpec[];
+    outputs?: MEventoValueSpec[];
+};
+type MEventoTraceEvent = {
+    kind: string;
+    line?: number;
+    col?: number;
+    node?: string;
+    name?: string;
+    stepCount?: number;
+    detail: {
+        [name: string]: unknown;
+    };
+};
+type MEventoFunctionList = Set<string> | string[] | MEventoFunctionSpec[] | {
+    [name: string]: MEventoFunctionSpec;
+};
 declare class RootAST extends AST {
     body: AST[];
     source: string;
@@ -220,6 +305,7 @@ declare abstract class ANodeVisitor {
 declare abstract class NodeVisitor extends ANodeVisitor {
     constructor();
     visit(node: AST): any;
+    protected beforeVisit(_node: AST): void;
     protected assignProperty(owner: any, property: any, value: any): any;
     protected abstract visitRootAST(node: RootAST): any;
     protected abstract visitBlockStatementAST(node: BlockStatementAST): any;
@@ -261,17 +347,43 @@ declare class MEvento extends NodeVisitor {
     protected currentScope?: MEventScope;
     debug: boolean;
     private static _globalFunctionsRegistry;
+    private static _globalFunctionSpecs;
     private static _cache;
     protected _functionsRegistry: {
         [k: string]: MEventoFBinding;
     };
+    protected _functionSpecs: {
+        [k: string]: MEventoFunctionSpec;
+    };
     protected _functionResolver?: (name: string) => MEventoFBinding | undefined;
-    constructor();
+    protected _options: MEventoOptions;
+    private _executionStepCount;
+    private _traceEvents;
+    constructor(options?: MEventoOptions);
+    get options(): MEventoOptions;
+    get executionStepCount(): number;
+    trace(): MEventoTraceEvent[];
+    protected resetExecutionBudget(): void;
+    protected beforeVisit(node: AST): void;
+    protected clearTrace(): void;
+    protected recordTrace(kind: string, node: AST, name?: string, detail?: {
+        [name: string]: unknown;
+    }): void;
     protected resolve(name: string): any;
     protected changeVariable(name: string, value: any): any;
     protected pushScope(name: string): void;
     protected popScope(): void;
     protected log(message: any): void;
+    protected successResult(value: any): {
+        ok: boolean;
+        value: any;
+        error: any;
+    };
+    protected errorResult(error: MEventoRuntimeError): {
+        ok: boolean;
+        value: any;
+        error: MEventoDiagnostic;
+    };
     protected visitRootAST(node: RootAST): any;
     protected visitBlockStatementAST(node: BlockStatementAST): any;
     protected visitIdentifierAST(node: IdentifierAST): any;
@@ -297,23 +409,54 @@ declare class MEvento extends NodeVisitor {
     resolveArguments(args: AST[]): any;
     setFunctionResolver(resolver: (name: string) => MEventoFBinding | undefined): void;
     resolveFunction(name: string): MEventoFBinding | undefined;
-    registerFunction(id: string, fn: MEventoFBinding): void;
+    resolveFunctionSpec(name: string): MEventoFunctionSpec | undefined;
+    capabilities(): {
+        [name: string]: MEventoFunctionSpec;
+    };
+    registerFunction(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     unregisterFunction(id: string): void;
+    validate(source: string, functions?: MEventoFunctionList, cache?: boolean): MEventoValidationResult;
+    validateManifest(source: string, manifest: MEventoScriptManifest, cache?: boolean): MEventoValidationResult;
+    protected validationFunctionSpecs(functions?: MEventoFunctionList): Map<string, MEventoFunctionSpec>;
+    protected validateNode(node: AST | null | undefined, knownFunctions: Map<string, MEventoFunctionSpec>, errors: MEventoValidationError[], protectedByTry?: boolean): void;
+    protected validateCallExpression(node: CallExpressionAST, knownFunctions: Map<string, MEventoFunctionSpec>, errors: MEventoValidationError[], protectedByTry: boolean): void;
+    protected validateStaticArgumentTypes(node: CallExpressionAST, spec: MEventoFunctionSpec, errors: MEventoValidationError[]): void;
+    protected staticArgumentType(node: AST): string | undefined;
+    protected argumentTypeMatches(spec: MEventoArgSpec, actualType: string): boolean;
+    protected validateManifestNode(module: AST, manifest: MEventoScriptManifest, errors: MEventoValidationError[]): void;
+    protected analyzeManifestNode(node: AST | null | undefined, analysis: {
+        knownInputs: Set<string>;
+        assigned: Set<string>;
+        assignedTypes: Map<string, string>;
+        reportedInputs: Set<string>;
+    }, errors: MEventoValidationError[]): void;
+    protected markAssignedTarget(node: AST, assignedType: string | undefined, analysis: {
+        assigned: Set<string>;
+        assignedTypes: Map<string, string>;
+    }): void;
+    protected valueSpecTypeMatches(spec: MEventoValueSpec, actualType: string): boolean;
+    protected validationError(code: string, node: AST, message: string, name?: string, diagnostic?: Pick<MEventoDiagnostic, "argCount" | "minArgs" | "maxArgs" | "argIndex" | "expectedType" | "actualType">): MEventoValidationError;
+    protected validateRuntimeArgumentTypes(node: AST, spec: MEventoFunctionSpec, values: unknown[]): void;
     execute(source: string, cache?: boolean, input?: {
         [k: string]: any;
     }): any;
     static compile(source: string, cache?: boolean): AST;
-    static register(id: string, fn: MEventoFBinding): void;
+    static register(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     static unregister(id: string): void;
+    static capabilities(): {
+        [name: string]: MEventoFunctionSpec;
+    };
+    static validateSource(source: string, functions: MEventoFunctionList, cache?: boolean): MEventoValidationResult;
+    static validateManifestSource(source: string, manifest: MEventoScriptManifest, cache?: boolean): MEventoValidationResult;
     static run(source: string, cache?: boolean, input?: {
         [k: string]: any;
-    }): any;
-    static newInstance(): MEvento;
+    }, options?: MEventoOptions): any;
+    static newInstance(options?: MEventoOptions): MEvento;
     clone(): MEvento;
     newAsyncInstance(): MEventoAsync;
 }
 declare class MEventoAsync extends MEvento {
-    constructor();
+    constructor(options?: MEventoOptions);
     protected visitRootAST(node: RootAST): Promise<any>;
     protected visitBlockStatementAST(node: BlockStatementAST): Promise<any>;
     protected visitIdentifierAST(node: AST): Promise<any>;
@@ -334,16 +477,16 @@ declare class MEventoAsync extends MEvento {
     protected visitForOfStatement(node: ForOfStatement): Promise<any[] | ReturnBranch>;
     protected visitReturnAST(node: ReturnAST): Promise<any>;
     resolveArgumentsAsync(args: AST[]): Promise<any[]>;
-    registerFunction(id: string, fn: MEventoFBinding): void;
+    registerFunction(id: string, fn: MEventoFBinding, spec?: MEventoFunctionSpec): void;
     unregisterFunction(id: string): void;
     execute(source: string, cache?: boolean, input?: {
         [k: string]: any;
     }): Promise<any>;
     static run(source: string, cache?: boolean, input?: {
         [k: string]: any;
-    }): Promise<any>;
-    static newInstance(): MEventoAsync;
+    }, options?: MEventoOptions): Promise<any>;
+    static newInstance(options?: MEventoOptions): MEventoAsync;
     clone(): MEventoAsync;
 }
 
-export { AST, ArrayExpression, AssignmentExpressionAST, BinaryExpressionAST, BlockStatementAST, BreakAST, BreakBranch, CallExpressionAST, ContinueAST, ContinueBranch, ExpressionStatementAST, ForLoopStatement, ForOfStatement, IdentifierAST, IfStatementAST, IndexAccessorAST, LexerDictionary, LiteralAST, LogicalExpressionAST, LoopControl, MEventScope, MEvento, MEventoAsync, type MEventoFBinding, NodeVisitor, ObjectExpression, ObjectProperty, ReturnAST, ReturnBranch, RootAST, Token, TokenType, TupleExpression, UnaryExpressionAST, WhileLoopStatement };
+export { AST, ArrayExpression, AssignmentExpressionAST, BinaryExpressionAST, BlockStatementAST, BreakAST, BreakBranch, CallExpressionAST, ContinueAST, ContinueBranch, ExpressionStatementAST, ForLoopStatement, ForOfStatement, IdentifierAST, IfStatementAST, IndexAccessorAST, LexerDictionary, LiteralAST, LogicalExpressionAST, LoopControl, MEventScope, MEvento, type MEventoArgSpec, MEventoAsync, type MEventoDiagnostic, type MEventoFBinding, type MEventoFunctionList, type MEventoFunctionSpec, type MEventoOptions, MEventoRuntimeError, type MEventoScriptManifest, type MEventoTraceEvent, type MEventoValidationError, type MEventoValidationResult, type MEventoValueSpec, NodeVisitor, ObjectExpression, ObjectProperty, ReturnAST, ReturnBranch, RootAST, Token, TokenType, TupleExpression, UnaryExpressionAST, WhileLoopStatement };

package/dist/esm/index.mjs

@@ -1,8 +1,8 @@
-function g(u,t){let e=`Invalid token ${u.type}[${u.value}] at ${u.line}, ${u.col} ${t?`: expecting ${t} token`:""}
-`;throw Error(e)}function l(u){return typeof u=="number"}function rt(u){return typeof u=="boolean"}function T(u){return typeof u=="string"}function f(u){return!(u===null||l(u)&&u===0||T(u)&&u.length===0||rt(u)&&!u)}function it(u){let t=0,e=0,i;if(u.length===0)return t;for(e=0;e<u.length;e++)i=u.charCodeAt(e),t=(t<<5)-t+i,t|=0;return t}var r=class{};r.id=0,r.comma=1,r.semi=2,r.numberConst=3,r.stringConst=4,r.equal=5,r.lparen=6,r.rparen=7,r.eol=8,r.eof=9,r.lbrace=10,r.rbrace=11,r.lbracket=12,r.rbracket=13,r.great=14,r.greatEq=15,r.less=16,r.lessEq=17,r.eqeq=18,r.IF=19,r.ELSE=20,r.TRUE=21,r.FALSE=22,r.NULL=23,r.not=24,r.notEq=25,r.and=26,r.or=27,r.plus=28,r.minus=29,r.div=30,r.mult=31,r.mod=32,r.invalid=33,r.colon=34,r.WHILE_TILL=35,r.FOR_LOOP=36,r.up=37,r.down=38,r.with=39,r.in=40,r.TILL=41,r.BREAK=42,r.CONTINUE=43,r.nullity=44,r.RETURN=45;var h=class u{constructor(t,e,i=1,s=1){this.type=t,this.value=e,this.line=i,this.col=s}static from(t,e){return new u(t,e)}toString(){return`[${this.type.toString()}, ${this.value}]`}},c=class{};c.equal=61,c.comma=44,c.semiColon=59,c.lparen=40,c.rparen=41,c.backslash=92,c.quote=34,c.squote=39,c.plus=43,c.minus=45,c.star=42,c.slash=47,c.percent=37,c.lbrace=123,c.rbrace=125,c.lbracket=91,c.rbracket=93,c.not=33,c.great=62,c.less=60,c.and=38,c.pipe=124,c.colon=58,c.questionMark=63,c.shebang=35;var L=class{constructor(t,e){this.keywords={};this.keywords={...e},this.lang=t}},m=class m{constructor(t){this._position=0;this._line=1;this._col=1;this._currentChar=-1;this._source=t,this._currentChar=this._source[this._position].charCodeAt(0),this._resolveLanguage()}get source(){return this._source}_resolveLanguage(){var e;let t=this.nextToken();if(t.type===r.less){let i=this.nextToken();i.type!==r.id&&g(t);let s=i.value.toString();this._language=(e=m.languages.find(n=>n.lang===s))!=null?e:m._defaultLanguage,t=this.nextToken(),t.type!==r.great&&g(t)}else this._language=m._defaultLanguage,this._position=0,this._currentChar=this._source[this._position].charCodeAt(0)}_advance(){if(this._position++,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col++}_jump(t){if(this._position+=t,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col+=t}_pick(){return this._position+1>=this._source.length?-1:this._source[this._position+1].charCodeAt(0)}_isId(t){return t<48?t===36:t<58?!0:t<65?!1:t<91?!0:t<97?t===95:t<123}_isIdStart(t){return t<65?t===36:t<91?!0:t<97?t===95:t<123}_id(){var o,a;let t="",e=this._col,i=this._position,s=this._line;for(;this._isId(this._currentChar);)t+=String.fromCharCode(this._currentChar),this._advance();let n=this._language&&(o=this._language.keywords[t])!=null?o:t;return(a=m.RESERVED[n])!=null?a:new h(r.id,t,s,e)}_isLineEnd(t){return t===10||t===13||[`
-`,"\r","\u2028","\u2029"].includes(String.fromCharCode(t))}_isWhiteSpace(t){return[" ","	"].includes(String.fromCharCode(t))}_isDigit(t){return t>0&&(t^48)<=9}_skipWhiteSpace(){for(;this._isWhiteSpace(this._currentChar)===!0;)this._advance()}_number(){let t="",e=this._col,i=this._position,s=this._line,n=String.fromCharCode(this._currentChar);this._advance();let o=String.fromCharCode(this._currentChar),a=10;if(n==="0"&&["b","B","x","X","o","O"].includes(o))switch(this._advance(),o.toLowerCase()){case"b":a=2;break;case"o":a=8;break;case"x":a=16;break;default:a=10}else t+=n,a=10;for(;this._isDigit(this._currentChar)||a===16&&["A","a","B","b","C","c","D","d","E","e","F","f"].includes(String.fromCharCode(this._currentChar));)t+=String.fromCharCode(this._currentChar),this._advance();if(String.fromCharCode(this._currentChar)==="."&&this._isDigit(this._pick())===!0){for(a!==10&&g(new h(r.id,o,s,i)),t+=String.fromCharCode(this._currentChar),this._advance();this._isDigit(this._currentChar);)t+=String.fromCharCode(this._currentChar),this._advance();return new h(r.numberConst,parseFloat(t),s,e)}return new h(r.numberConst,parseInt(t,a),s,e)}_literalString(t){let e="",i=-1,s=this._position,n=this._col,o=this._line;for(;this._currentChar!==-1;){let a=String.fromCharCode(this._pick());if(this._currentChar==c.backslash){switch(a){case"\\":e+="\\";break;case"0":e+="\0";break;case"a":e+="a";break;case"b":e+="\b";break;case"f":e+="\f";break;case"n":e+=`
-`;break;case"r":e+="\r";break;case"t":e+="	";break;case"u":e+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+6),16)),this._jump(4);break;case"v":e+="\v";break;case"x":e+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+4),16)),this._jump(2);break;default:if(String.fromCharCode(t)==a)e+=String.fromCharCode(t);else{this._advance(),i=this._currentChar,e+=String.fromCharCode(this._currentChar),this._advance();continue}}this._jump(2),i=this._currentChar;continue}if(this._currentChar===t&&i!==c.backslash)break;e+=String.fromCharCode(this._currentChar),i=this._currentChar,this._advance()}return new h(r.stringConst,e,o,n)}_skipLineComment(){for(;!this._isLineEnd(this._currentChar)&&this._currentChar!=-1;)this._advance()}_skipComment(){for(;this._currentChar!==-1;){if(this._currentChar===c.star&&this._pick()===c.shebang){this._advance(),this._advance();break}this._advance()}}nextToken(){let t=this._line,e=this._col,i=this._position;for(;this._currentChar!==-1;){if(this._isLineEnd(this._currentChar))return this._line++,this._col=1,this._advance(),new h(r.eol,`
-`,t,e);if(this._isWhiteSpace(this._currentChar)){this._skipWhiteSpace();continue}if(this._currentChar==c.shebang){this._advance(),this._currentChar===c.star?(this._advance(),this._skipComment()):this._skipLineComment();continue}if(this._isDigit(this._currentChar))return this._number();if(this._isIdStart(this._currentChar))return this._id();if(this._currentChar===c.equal)return this._advance(),this._currentChar===c.equal?(this._advance(),new h(r.eqeq,"==",t,e)):new h(r.equal,"=",t,e);if(this._currentChar===c.great)return this._advance(),this._currentChar===c.equal?(this._advance(),new h(r.greatEq,">=",t,e)):new h(r.great,">",t,e);if(this._currentChar===c.less)return this._advance(),this._currentChar===c.equal?(this._advance(),new h(r.lessEq,"<=",t,e)):new h(r.less,"<",t,e);if(this._currentChar===c.semiColon)return this._advance(),new h(r.semi,";",t,e);if(this._currentChar===c.lparen)return this._advance(),new h(r.lparen,"(",t,e);if(this._currentChar===c.rparen)return this._advance(),new h(r.rparen,")",t,e);if(this._currentChar===c.comma)return this._advance(),new h(r.comma,",",t,e);if(this._currentChar===c.lbrace)return this._advance(),new h(r.lbrace,"{",t,e);if(this._currentChar===c.rbrace)return this._advance(),new h(r.rbrace,"}",t,e);if(this._currentChar===c.lbracket)return this._advance(),new h(r.lbracket,"[",t,e);if(this._currentChar===c.rbracket)return this._advance(),new h(r.rbracket,"]",t,e);if(this._currentChar===c.plus)return this._advance(),new h(r.plus,"+",t,e);if(this._currentChar===c.minus)return this._advance(),new h(r.minus,"-",t,e);if(this._currentChar===c.slash)return this._advance(),new h(r.div,"/",t,e);if(this._currentChar===c.star)return this._advance(),new h(r.mult,"*",t,e);if(this._currentChar===c.percent)return this._advance(),new h(r.mod,"%",t,e);if(this._currentChar===c.colon)return this._advance(),new h(r.colon,":",t,e);if(this._currentChar===c.not)return this._advance(),this._currentChar===c.equal?(this._advance(),new h(r.notEq,"!=",t,e)):new h(r.not,"!",t,e);if(this._currentChar===c.and&&this._pick()===c.and)return this._advance(),this._advance(),new h(r.and,"&&",t,e);if(this._currentChar===c.pipe&&this._pick()===c.pipe)return this._advance(),this._advance(),new h(r.or,"||",t,e);if(this._currentChar===c.questionMark&&this._pick()===c.questionMark)return this._advance(),this._advance(),new h(r.nullity,"??",t,e);if(this._currentChar===c.quote||this._currentChar===c.squote){let s=this._currentChar;this._advance();let n=this._literalString(s);return this._advance(),n}return new h(r.invalid,String.fromCharCode(this._currentChar),t,e)}return new h(r.eof,"",t,e)}};m._defaultLanguage=new L("en",{if:"if",else:"else",true:"true",false:"false",null:"null",while:"while",for:"for",with:"with",up:"up",down:"down",till:"till",in:"in",break:"break",continue:"continue",return:"return"}),m.languages=[m._defaultLanguage,new L("fr",{si:"if",sinon:"else",vrai:"true",faux:"false",nul:"null",tanque:"while",pour:"for",avec:"with",mont:"up",desc:"down",jusqua:"till",dans:"in",couper:"break",continuer:"continue",returner:"return"}),new L("bm",{nii:"if",note:"else",tien:"true",galon:"false",gansan:"null",foo:"while",seginka:"for",niin:"with",kay:"up",kaj:"down",kata:"till",kono:"in",tike:"break",ipan:"continue",segin:"return"})],m.RESERVED={if:h.from(r.IF,"if"),else:h.from(r.ELSE,"else"),true:h.from(r.TRUE,!0),false:h.from(r.FALSE,!1),null:h.from(r.NULL,null),for:h.from(r.FOR_LOOP,"for"),while:h.from(r.WHILE_TILL,"while"),with:h.from(r.with,"with"),up:h.from(r.up,"up"),down:h.from(r.down,"down"),till:h.from(r.TILL,"till"),in:h.from(r.in,"in"),break:h.from(r.BREAK,"break"),continue:h.from(r.CONTINUE,"continue"),return:h.from(r.RETURN,"return")};var X=m,d=class{constructor(t,e){this.line=t,this.col=e}dump(){return this.toString()}},F=class extends d{constructor(t,e,i){super(1,1),this.body=t,this.name=e,this.source=i}dump(){let t=`Module ${this.name} Start {`;for(let e of this.body)t+=`${e.dump()}
-`;return t+="}",t}},$=class extends d{constructor(t,e){super(e.line,e.col),this.body=t}toString(){return`{
-${this.body.map(t=>t.toString()).join(`
-`)}}`}},b=class extends d{constructor(t){super(t.line,t.col),this.value=t.value.toString()}toString(){return this.value}},y=class extends d{constructor(t,e){super(t.line,t.col),this.value=t.value,this.raw=e}toString(){return this.value.toString()}},E=class extends d{constructor(t,e){super(t.line,t.col),this.identifier=t,this.init=e}toString(){return`${this.identifier} = ${this.init}`}},G=class extends d{constructor(t){super(t.line,t.col),this.expression=t}toString(){return this.expression.toString()}},R=class extends d{constructor(t,e){super(t.line,t.col),this.callee=t,this.arguments=e}toString(){return`${this.callee.toString()}(...${this.arguments.length})`}},V=class extends d{constructor(t,e,i){super(t.line,t.col),this.left=t,this.operation=e,this.right=i}toString(){return`${this.left} ${this.operation} ${this.right}`}},q=class extends d{constructor(t,e){super(t.line,t.col),this.operation=t,this.argument=e}toString(){return`${this.operation} ${this.argument}`}},B=class extends d{constructor(t,e,i){super(t.line,t.col),this.test=t,this.consequent=e,this.alternate=i}toString(){return`if ${this.test} ${this.consequent} ${this.alternate?`else ${this.alternate} `:""}`}},P=class extends d{constructor(t,e,i){super(t.line,t.col),this.left=t,this.operator=e,this.right=i}toString(){return`${this.left} ${this.operator.value} ${this.right}`}},x=class extends d{constructor(e,i,s=!1){super(e.line,e.col);this.computed=!1;this.owner=e,this.key=i,this.computed=s}toString(){return`${this.owner}[${this.key}]`}},j=class extends d{constructor(t,e,i){super(e==null?void 0:e.line,e==null?void 0:e.col),this.properties=t}toString(){return"{...}"}},N=class extends d{constructor(t,e,i){super(e==null?void 0:e.line,e==null?void 0:e.col),this.elements=t}toString(){return"[...]"}},k=class extends d{constructor(t,e){super(t.line,t.col),this.value=e,this.key=t}},U=class extends d{constructor(e,i,s,n,o=!1){super(s==null?void 0:s.line,s==null?void 0:s.col);this.retain=!1;this.test=e,this.body=i,this.retain=o}},M=class extends d{constructor(e,i,s,n,o,a,p,S=!1){super(a==null?void 0:a.line,a==null?void 0:a.col);this.init=e;this.test=i;this.update=s;this.direction=n;this.body=o;this.retain=S}},W=class extends d{constructor(e,i,s,n,o,a=!1){super(n==null?void 0:n.line,n==null?void 0:n.col);this.identifier=e;this.collection=i;this.body=s;this.retain=a}},D=class extends d{constructor(e,i){super(e.line,e.col);this.first=e;this.second=i}},H=class extends d{constructor(t,e){super(t,e)}},K=class extends d{constructor(t,e,i){super(e,i),this.value=t}},z=class extends d{constructor(t,e){super(t,e)}},J=class{constructor(t=1/0){this.capacity=t;this.storage=[]}push(t){if(this.size()===this.capacity)throw Error("Stack has reached max capacity, you cannot add more items");this.storage.push(t)}pop(){return this.storage.pop()}peek(){return this.storage[this.size()-1]}size(){return this.storage.length}get isEmpty(){return this.storage.length===0}},I=class I{constructor(t){this._loopTrack=new J;this.currentToken=t.nextToken(),this.lexer=t}_eat(t){var e;((e=this.currentToken)==null?void 0:e.type)===t?this.currentToken=this.lexer.nextToken():g(this.currentToken,t)}_eatEOL(){var t;for(;((t=this.currentToken)==null?void 0:t.type)===r.eol;)this._eat(r.eol)}_eatSemiOrEOL(){var t,e;for(;((t=this.currentToken)==null?void 0:t.type)===r.eol||((e=this.currentToken)==null?void 0:e.type)===r.semi;)this._eat(this.currentToken.type)}_eatSemi(){var t;for(;((t=this.currentToken)==null?void 0:t.type)===r.semi;)this._eat(r.semi)}_variable(){let t=new b(this.currentToken);return this._eat(r.id),t}_return(){let t=this.currentToken,e;return!this._expect(r.eol)&&!this._expect(r.semi)&&(e=this._expression()),new K(e,t==null?void 0:t.line,t==null?void 0:t.col)}_factor(){let t=this.currentToken;switch(t.type){case r.plus:case r.minus:case r.not:return this._eat(this.currentToken.type),new q(t,this._term());case r.numberConst:return this._eat(r.numberConst),new y(t,t.value.toString());case r.stringConst:return this._eat(r.stringConst),new y(t,t.value.toString());case r.lparen:this._eat(r.lparen);let e=this._expression();return this._eat(r.rparen),e;case r.TRUE:case r.FALSE:return this._eat(this.currentToken.type),new y(t,t.value.toString());case r.NULL:return this._eat(r.NULL),new y(t,"null");case r.lbracket:return this._arrayExpression();case r.lbrace:return this._objectExpression();case r.IF:return this._ifStatement();case r.WHILE_TILL:return this._whileLoop(!0);case r.FOR_LOOP:return this._forLoop(!0);case r.BREAK:return this._breakExpression();case r.CONTINUE:return this._continueExpression();default:return this._variable()}}_breakExpression(){var t,e;return this._loopTrack.isEmpty&&g(this.currentToken),this._eat(r.BREAK),new H((t=this.currentToken)==null?void 0:t.line,(e=this.currentToken)==null?void 0:e.col)}_continueExpression(){var t,e;return this._loopTrack.isEmpty&&g(this.currentToken),this._eat(r.CONTINUE),new z((t=this.currentToken)==null?void 0:t.line,(e=this.currentToken)==null?void 0:e.col)}_term(){let t=this._factor();return t=this._tryParsingFunctionCall(t),t=this._tryParsingMemberExpression(t),t}_expression(){let t=this._term();for(t=this._tryBinaryExpression(0,t);[r.and,r.or,r.nullity].includes(this.currentToken.type);){let e=this.currentToken;this._eat(e.type),t=new P(t,e,this._expression())}if(this._expect(r.equal))if(t instanceof b||t instanceof x){let e=this.currentToken;this._eat(r.equal),t=new E(t,this._expression())}else throw new Error("Unexpected token");return t}_objectProperty(){var s;let t;switch((s=this.currentToken)==null?void 0:s.type){case r.stringConst:{t=new y(this.currentToken,this.currentToken.value),this._eat(r.stringConst);break}case r.lbracket:{this._eat(r.lbracket);var e=this._expression();this._eat(r.rbracket),t=e;break}case r.id:{let n=this._variable();t=new y(new h(r.id,n.value,n.line,n.col),n.value);break}default:throw`Unexpected token ${this.currentToken}`}this._eat(r.colon);var i=this._expression();return new k(t,i)}_property(){return this._objectProperty()}_objectProperties(){var e,i;let t=[];for(((e=this.currentToken)==null?void 0:e.type)!=r.rbrace&&(this._eatEOL(),t.push(this._property()),this._eatEOL());((i=this.currentToken)==null?void 0:i.type)===r.comma&&(this._eat(r.comma),this._eatEOL(),!this._expect(r.rbrace));)t.push(this._property()),this._eatEOL();return t}_objectExpression(t){var e=t!=null?t:this.currentToken;t||this._eat(r.lbrace);var i=this._objectProperties();return this._eat(r.rbrace),new j(i,e,this.currentToken)}_arrayExpression(){this._eat(r.lbracket);let t=this._expect(r.rbracket)?[]:this._expressionsList();this._eat(r.rbracket);var e=t.length!==0?t[0]:void 0,i=t.length!==0?t[t.length-1]:void 0;return new N(t,e,i)}_tryParsingMemberExpression(t){let e=t;for(;this.currentToken.type===r.lbracket;){this._eat(r.lbracket);let i=this._expression();e=new x(e,i),this._eat(r.rbracket)}return e}_tryBinaryExpression(t,e){let i=e;for(;;){let s=I._binopPrecdences[this.currentToken.type]||-1;if(s<t)return i;let n=this.currentToken;this._eat(n.type);let o=this._term(),a=I._binopPrecdences[this.currentToken.type]||-1;if(s<a){let p=this._tryBinaryExpression(s+1,o);if(p===i)return p;o=p}i=new V(i,n,o)}}_expressionsList(){var i;this._eatEOL();let t=this._expression();this._eatEOL();let e=[t];for(;((i=this.currentToken)==null?void 0:i.type)===r.comma&&(this._eat(r.comma),this._eatEOL(),!this._expect(r.rbracket));)t=this._expression(),e.push(t),this._eatEOL();return e}_callExpression(t){this._eat(r.lparen);let e=[];return this._expect(r.rparen)||(e=this._expressionsList()),this._eat(r.rparen),t instanceof b||g(this.currentToken),new R(t,e)}_tryParsingFunctionCall(t){let e=t;for(;this.currentToken.type===r.lparen;)e=this._callExpression(e);return e}_statementExpression(){let t=this._expression();return[r.semi,r.eol,r.eof].includes(this.currentToken.type)||g(this.currentToken),t}_blockStatement(t=!1){var i;if(t||this._eat(r.lbrace),this._eatEOL(),this._expect(r.rbrace))return this._eat(r.rbrace),new $([],this.currentToken);let e=[this._statement()];for(;this._eatSemiOrEOL(),!(this.currentToken.type===r.rbrace||this.currentToken.type===r.eof||(e.push(this._statement()),this._expect(r.rbrace)));)this.currentToken.type!==r.eol&&this.currentToken.type!==r.semi&&this.currentToken.type!==r.eof&&g(this.currentToken);return this._eat(r.rbrace),((i=this.currentToken)==null?void 0:i.type)===r.rbrace&&this._eat(r.rbrace),new $(e,this.currentToken)}_ifStatement(){this._eat(r.IF);let t=this.currentToken.type===r.lparen;t&&this._eat(r.lparen);let e=this._expression();t&&this._eat(r.rparen);let i;this.currentToken.type===r.lbrace?i=this._blockStatement():i=this._expression();let s;if(this.currentToken.type===r.ELSE)switch(this._eat(r.ELSE),this.currentToken.type){case r.IF:s=this._ifStatement();break;case r.lbrace:s=this._blockStatement();break;default:s=this._expression()}return new B(e,i,s)}_pushLoop(){this._loopTrack.push(!0)}_popLoop(){this._loopTrack.pop()}_whileLoop(t=!1){let e=this.currentToken;this._eat(r.WHILE_TILL),this._pushLoop();let i=this._expression(),s=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();return this._popLoop(),new U(i,s,e,this.currentToken,t)}_forOfIdentifier(){switch(this.currentToken.type){case r.lparen:{this._eat(r.lparen);let t=this._variable();this._eat(r.comma);let e=this._variable();return this._eat(r.rparen),new D(t,e)}default:return this._variable()}}_forLoop(t=!1){let e=this.currentToken;this._eat(r.FOR_LOOP),this._pushLoop();let i=[r.lparen].includes(this.currentToken.type),s;if(i)s=this._forOfIdentifier();else{let n=this._expression();n instanceof E||(i=!0),s=n}if(!i&&s instanceof E){this._eat(r.TILL);let n=this._expression(),o;if(this.currentToken.type===r.up||this.currentToken.type===r.down){let S=this.currentToken;this._eat(S.type),o=S}else o=new h(r.up,"up");let a;this._expect(r.with)?(this._eat(r.with),a=this._expression()):a=new y(new h(r.numberConst,1,this.currentToken.line,this.currentToken.col),"1");let p=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();s=new M(s,n,a,o,p,e,this.currentToken,t),this._popLoop()}else if(i){this._eat(r.in);let n=this._expression(),o=this.currentToken.type===r.lbrace?this._blockStatement():this._expression();s=new W(s,n,o,e,this.currentToken,t),this._popLoop()}else g(this.currentToken);return s}_statement(){switch(this.currentToken.type){case r.BREAK:return this._breakExpression();case r.CONTINUE:return this._continueExpression();case r.RETURN:return this._eat(r.RETURN),this._return();case r.semi:return this._eatSemi(),this._statement();case r.eol:return this._eatEOL(),this._statement();case r.WHILE_TILL:return this._whileLoop();case r.FOR_LOOP:return this._forLoop();default:return this._statementExpression()}}_expect(t){var e;return((e=this.currentToken)==null?void 0:e.type)===t}_definition(){if(this._eatSemiOrEOL(),this._expect(r.eof))return[];let t=[this._statement()];for(;;){if(this._eatSemiOrEOL(),this.currentToken.type===r.eof){this._eat(r.eof);break}this.currentToken.type===r.lbrace?t.push(this._blockStatement()):t.push(this._statement())}return t}_root(){let t=this.lexer.source,e="<module>",i=this._definition();return new F(i,e,t)}parse(){return this._root()}};I._binopPrecdences={[r.eqeq]:10,[r.notEq]:10,[r.great]:10,[r.greatEq]:10,[r.less]:10,[r.lessEq]:10,[r.plus]:20,[r.minus]:20,[r.mult]:40,[r.div]:40,[r.mod]:40};var Y=I,C=class{},A=class extends C{},w=class extends C{},v=class{constructor(t){this.value=t}},Z=class{constructor(){this._nodesVisitors={}}registerVisitor(t,e){let i=`visit${t.name}`;this._nodesVisitors[i]=e}},tt=class extends Z{constructor(){super(),this.registerVisitor(F,this.visitRootAST),this.registerVisitor($,this.visitBlockStatementAST),this.registerVisitor(b,this.visitIdentifierAST),this.registerVisitor(y,this.visitLiteralAST),this.registerVisitor(E,this.visitAssignmentExpressionAST),this.registerVisitor(G,this.visitExpressionStatementAST),this.registerVisitor(R,this.visitCallExpressionAST),this.registerVisitor(V,this.visitBinaryExpressionAST),this.registerVisitor(q,this.visitUnaryExpressionAST),this.registerVisitor(B,this.visitIfStatementAST),this.registerVisitor(P,this.visitLogicalExpressionAST),this.registerVisitor(x,this.visitIndexAccessorAST),this.registerVisitor(k,this.visitObjectProperty),this.registerVisitor(j,this.visitObjectExpression),this.registerVisitor(N,this.visitArrayExpression),this.registerVisitor(U,this.visitWhileLoopStatement),this.registerVisitor(M,this.visitForLoopStatement),this.registerVisitor(W,this.visitForOfStatement),this.registerVisitor(H,this.visitBreakAST),this.registerVisitor(z,this.visitContinueAST),this.registerVisitor(K,this.visitReturnAST)}visit(t){var e;try{let i=`visit${t.constructor.name}`,s=this._nodesVisitors[i];return(e=s==null?void 0:s.call(this,t))!=null?e:null}catch{return null}}assignProperty(t,e,i){(Array.isArray(t)||typeof t=="object")&&(t[e]=i)}},Q=class{constructor(t,e,i){this.memory={};this.name=t,this.memory=e,this.parent=i}resolve(t){var e,i;return Object.keys(this.memory).includes(t)?this.memory[t]:(i=(e=this.parent)==null?void 0:e.resolve(t))!=null?i:null}change(t,e,i=!0){return Object.keys(this.memory).includes(t)?(this.memory[t]=e,!0):this.parent&&this.parent.change(t,e,!1)?!0:i?(this.memory[t]=e,!0):!1}},_=class _ extends tt{constructor(){super();this.rootScope=new Q("Program",{});this.currentScope=this.rootScope;this.debug=!1;this._functionsRegistry={};this._functionsRegistry={..._._globalFunctionsRegistry}}resolve(e){var i,s;return(s=(i=this.currentScope)==null?void 0:i.resolve(e))!=null?s:null}changeVariable(e,i){var s;return(s=this.currentScope)!=null&&s.change(e,i)?i:null}pushScope(e){let i=new Q(e,{},this.currentScope);this.currentScope=i}popScope(){var e;this.currentScope=(e=this.currentScope)==null?void 0:e.parent}log(e){this.debug&&console.log(e)}visitRootAST(e){var n;let i=e.body,s;for(let o of i)if(s=this.visit(o),s instanceof v)return(n=s.value)!=null?n:null;return s!=null?s:null}visitBlockStatementAST(e){let i=e.body,s;this.pushScope("Block");for(let n of i)if(s=this.visit(n),s instanceof C||s instanceof v)break;return this.popScope(),s!=null?s:null}visitIdentifierAST(e){var s;let i=e.value;return(s=this==null?void 0:this.resolve(i))!=null?s:null}visitLiteralAST(e){return e.value}visitAssignmentExpressionAST(e){let i=e.identifier,s=e.init,n=null;if(i instanceof x){var o=this.visit(i.owner);n=this.visit(e.init);var a=this.visit(i.key);this.assignProperty(o,a,n)}else i instanceof b&&(n=this.visit(s),this.changeVariable(i.value,n));return n}visitExpressionStatementAST(e){let i=e.expression;return this.visit(i)}visitCallExpressionAST(e){let i=e.callee,s=e.arguments,n=i.value,o=this.resolveFunction(n),a=s.map(p=>this.visit(p));return o==null?void 0:o(a,this)}visitBinaryExpressionAST(e){let i=e.left,s=e.right,n=e.operation,o=this.visit(i),a=this.visit(s);switch(n.type){case r.plus:return l(o)&&l(a)?o+a:`${o}${a}`;case r.minus:if(l(o)&&l(a))return o-a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.mult:if(l(o)&&l(a))return o*a;if(T(o)&&l(a))return o.repeat(a);if(l(o)&&T(a))return a.repeat(o);throw new Error(`Operation ${n.value} not allowed no num value`);case r.div:if(l(o)&&l(a)){if(a===0)throw new Error("Invalid division by 0");return o/a}throw new Error(`Operation ${n.value} not allowed no num value`);case r.mod:if(l(o)&&l(a))return o%a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.great:if(l(o)&&l(a))return o>a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.greatEq:if(l(o)&&l(a))return o>=a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.less:if(l(o)&&l(a))return o<a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.lessEq:if(l(o)&&l(a))return o<=a;throw new Error(`Operation ${n.value} not allowed no num value`);case r.eqeq:return o===a;case r.notEq:return o!==a;default:throw new Error(`Operation ${n.value} not allowed no num value`)}}visitUnaryExpressionAST(e){let i=e.argument,s=e.operation,n=this.visit(i);if(s.type===r.not)return f(n)===!1;if(!l(n))throw new Error(`Operation ${s.value} not allowed no num value`);if(s.type===r.plus)return n;if(s.type===r.minus)return-n;throw new Error(`Operation ${s.value} not allowed no num value`)}visitIfStatementAST(e){let i=e.test,s=this.visit(i);return f(s)?this.visit(e.consequent):e.alternate?this.visit(e.alternate):null}visitLogicalExpressionAST(e){let i=e.left,s=this.visit(i);if(e.operator.type===r.nullity)return s!=null?s:this.visit(e.right);let n=f(s);return e.operator.type===r.and?n?f(this.visit(e.right)):!1:e.operator.type===r.or?n?!0:f(this.visit(e.right)):null}visitIndexAccessorAST(e){var n,o;let i=e.owner,s=this.visit(i);if(s==null)return null;if(typeof s=="object"){let a=this.visit(e.key);return(n=s[a])!=null?n:null}else if(Array.isArray(s)){let a=this.visit(e.key);return l(a)&&s.length<a&&a>=0&&(o=s[a])!=null?o:null}return null}visitObjectProperty(e){}visitObjectExpression(e){let i={},s=e;for(let n of s.properties)if(n instanceof k){let o=this.visit(n.key);o=T(o)?o:o.toString(),i[o]=this.visit(n.value)}return i}visitArrayExpression(e){let i=e;return this.resolveArguments(i.elements)}visitBreakAST(e){return new A}visitWhileLoopStatement(e){this.log(`WhileLoopStatement ${e.test} ${e.body}`);let i=e.retain?[]:void 0;for(;f(this.visit(e.test));){let s=this.visit(e.body);if(s instanceof A)break;if(!(s instanceof w)){if(s instanceof v)return this.popScope(),s;i==null||i.push(s)}}return i!=null?i:null}visitForLoopStatement(e){let i=e.retain?[]:void 0,s=e.init.identifier;if(!(s instanceof b))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let n=this.visit(e.init.init);this.changeVariable(s.value,n);let o=()=>{let p=this.visit(e.test);if(l(p)){let S=this.resolve(s.value);return e.direction.type===r.up?p>=S:p<=S}return f(p)},a=()=>{let p=this.visit(e.update);if(l(p)){let S=this.resolve(s.value);if(!l(S))throw Error("Cant update value");this.changeVariable(s.value,e.direction.type===r.up?S+p:S-p)}else throw Error("Update value cant be non number")};for(;o();){let p=this.visit(e.body);if(p instanceof A)break;if(p instanceof w){a();continue}if(p instanceof v)return this.popScope(),p;i==null||i.push(p),a()}return this.popScope(),i!=null?i:null}visitForOfStatement(e){let i=this.visit(e.collection);if(!Array.isArray(i))throw Error("Can iterate non array object");let s=e.retain?[]:void 0;this.pushScope("ForOfStatement");for(let n of i){this._declareForIdentifier(e.identifier,n);let o=this.visit(e.body);if(o instanceof A)break;if(!(o instanceof w)){if(o instanceof v)return this.popScope(),o;s==null||s.push(o)}}return this.popScope(),s!=null?s:null}visitContinueAST(e){return new w}visitReturnAST(e){return new v(e.value!=null?this.visit(e.value):null)}_declareForIdentifier(e,i){if(e instanceof D){if(!Array.isArray(i))throw Error("Unable to make a tuple from non Array element");this.changeVariable(e.first.value,i[0]),this.changeVariable(e.second.value,i[1])}this.changeVariable(e.value,i)}resolveArguments(e){return e.map(i=>this.visit(i))}setFunctionResolver(e){this._functionResolver=e}resolveFunction(e){var i,s;return(s=this._functionsRegistry[e])!=null?s:(i=this._functionResolver)==null?void 0:i.call(this,e)}registerFunction(e,i){this._functionsRegistry[e]=i}unregisterFunction(e){delete this._functionsRegistry[e]}execute(e,i=!0,s){let n=_.compile(e,i);return s&&Object.keys(s).forEach(o=>this.changeVariable(o,s[o])),this.visit(n)}static compile(e,i=!1){let s=it(e);if(i&&this._cache.has(s))return this._cache.get(s);let n=new X(e),a=new Y(n).parse();return i&&this._cache.set(s,a),a}static register(e,i){_._globalFunctionsRegistry[e]=i}static unregister(e){delete _._globalFunctionsRegistry[e]}static run(e,i=!1,s){let n=new _,o=_.compile(e,i);return s&&Object.keys(s).forEach(a=>n.changeVariable(a,s[a])),n.visit(o)}static newInstance(){return new _}clone(){var e=new _;return e._functionsRegistry={...this._functionsRegistry},e.rootScope.memory={...this.rootScope.memory},e}newAsyncInstance(){let e=et.newInstance();return e.rootScope.memory=this.rootScope.memory,e._functionsRegistry=this._functionsRegistry,e}};_._globalFunctionsRegistry={},_._cache=new Map;var O=_,et=class u extends O{constructor(){super()}async visitRootAST(t){var s;let e=t.body,i;for(let n of e)if(i=await this.visit(n),i instanceof v)return(s=i.value)!=null?s:null;return i!=null?i:null}async visitBlockStatementAST(t){let e=t.body,i;this.pushScope("Block");for(let s of e)if(i=await this.visit(s),i instanceof C||i instanceof v)break;return this.popScope(),i}async visitIdentifierAST(t){let e=t.value;return this.resolve(e)}async visitLiteralAST(t){return t.value}async visitAssignmentExpressionAST(t){let e=t.identifier,i=t.init,s=null;if(e instanceof x){var n=await this.visit(e.owner);s=await this.visit(t.init);var o=await this.visit(e.key);this.assignProperty(n,o,s)}else e instanceof b&&(s=await this.visit(i),this.changeVariable(e.value,s));return s}async visitExpressionStatementAST(t){let e=t.expression;return await this.visit(e)}async visitCallExpressionAST(t){let e=t.callee,i=t.arguments,s=e.value,n=this._functionsRegistry[s],o=await Promise.all(i.map(a=>this.visit(a)));return await(n==null?void 0:n(o,this))}async visitBinaryExpressionAST(t){let e=t.left,i=t.right,s=t.operation,n=await this.visit(e),o=await this.visit(i);switch(s.type){case r.plus:return l(n)&&l(o)?n+o:`${n}${o}`;case r.minus:if(l(n)&&l(o))return n-o;if(T(n)&&l(o))return n.repeat(o);if(l(n)&&T(o))return o.repeat(n);throw new Error(`Operation ${s.value} not allowed no num value`);case r.mult:if(l(n)&&l(o))return n*o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.div:if(l(n)&&l(o)){if(o===0)throw new Error("Invalid division by 0");return n/o}throw new Error(`Operation ${s.value} not allowed no num value`);case r.mod:if(l(n)&&l(o))return n%o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.great:if(l(n)&&l(o))return n>o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.greatEq:if(l(n)&&l(o))return n>=o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.less:if(l(n)&&l(o))return n<o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.lessEq:if(l(n)&&l(o))return n<=o;throw new Error(`Operation ${s.value} not allowed no num value`);case r.eqeq:return n===o;case r.notEq:return n!==o;default:throw new Error(`Operation ${s.value} not allowed no num value`)}}async visitUnaryExpressionAST(t){let e=t.argument,i=t.operation,s=await this.visit(e);if(i.type===r.not)return f(s)===!1;if(!l(s))throw new Error(`Operation ${i.value} not allowed no num value`);if(i.type===r.plus)return s;if(i.type===r.minus)return-s;throw new Error(`Operation ${i.value} not allowed no num value`)}async visitIfStatementAST(t){let e=t.test,i=await this.visit(e);return f(i)?await this.visit(t.consequent):t.alternate?await this.visit(t.alternate):null}async visitLogicalExpressionAST(t){let e=t.left,i=await this.visit(e);if(t.operator.type===r.nullity)return i!=null?i:await this.visit(t.right);let s=f(i);return t.operator.type===r.and?s?f(await this.visit(t.right)):!1:t.operator.type===r.or?s?!0:f(await this.visit(t.right)):!1}async visitIndexAccessorAST(t){var s,n;let e=t.owner,i=await this.visit(e);if(i==null)return null;if(typeof i=="object"){let o=await this.visit(t.key);return(s=i[o])!=null?s:null}else if(Array.isArray(i)){let o=await this.visit(t.key);return l(o)&&i.length<o&&o>=0&&(n=i[o])!=null?n:null}return null}async visitObjectProperty(t){}async visitObjectExpression(t){let e={},i=t;for(let s of i.properties)if(s instanceof k){let n=await this.visit(s.key);n=T(n)?n:n.toString(),e[n]=await this.visit(s.value)}return e}async visitArrayExpression(t){let e=t;return await this.resolveArgumentsAsync(e.elements)}async visitWhileLoopStatement(t){this.log(`WhileLoopStatement ${t.test} ${t.body}`);let e=t.retain?[]:void 0;for(;f(await this.visit(t.test));){let i=await this.visit(t.body);if(i instanceof A)break;if(!(i instanceof w)){if(i instanceof v)return this.popScope(),i;e==null||e.push(i)}}return e}async visitForLoopStatement(t){let e=t.retain?[]:void 0,i=t.init.identifier;if(!(i instanceof b))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let s=await this.visit(t.init.init);this.changeVariable(i.value,s);let n=async()=>{let a=await this.visit(t.test);if(l(a)){let p=this.resolve(i.value);return t.direction.type===r.up?a>=p:a<=p}return f(a)},o=async()=>{let a=await this.visit(t.update);if(l(a)){let p=this.resolve(i.value);if(!l(p))throw Error("Cant update value");this.changeVariable(i.value,t.direction.type===r.up?p+a:p-a)}else throw Error("Update value cant be non number")};for(;await n();){let a=await this.visit(t.body);if(a instanceof A)break;if(a instanceof w){await o();continue}if(a instanceof v)return this.popScope(),a;e==null||e.push(a),await o()}return this.popScope(),e!=null?e:null}async visitForOfStatement(t){let e=await this.visit(t.collection);if(!Array.isArray(e))throw Error("Can iterate non array object");let i=t.retain?[]:void 0;this.pushScope("ForOfStatement");for(let s of e){this._declareForIdentifier(t.identifier,s);let n=await this.visit(t.body);if(n instanceof A)break;if(!(n instanceof w)){if(n instanceof v)return this.popScope(),n;i==null||i.push(n)}}return this.popScope(),i}async visitReturnAST(t){return new v(t.value!=null?await this.visit(t.value):null)}async resolveArgumentsAsync(t){return await Promise.all(t.map(async e=>await this.visit(e)))}registerFunction(t,e){this._functionsRegistry[t]=e}unregisterFunction(t){delete this._functionsRegistry[t]}async execute(t,e=!0,i){let s=O.compile(t,e);return i&&Object.keys(i).forEach(n=>this.changeVariable(n,i[n])),await this.visit(s)}static async run(t,e=!1,i){let s=new u,n=O.compile(t,e);return i&&Object.keys(i).forEach(o=>s.changeVariable(o,i[o])),await s.visit(n)}static newInstance(){return new u}clone(){var t=new u;return t._functionsRegistry={...this._functionsRegistry},t.rootScope.memory={...this.rootScope.memory},t}};export{d as AST,N as ArrayExpression,E as AssignmentExpressionAST,V as BinaryExpressionAST,$ as BlockStatementAST,H as BreakAST,A as BreakBranch,R as CallExpressionAST,z as ContinueAST,w as ContinueBranch,G as ExpressionStatementAST,M as ForLoopStatement,W as ForOfStatement,b as IdentifierAST,B as IfStatementAST,x as IndexAccessorAST,L as LexerDictionary,y as LiteralAST,P as LogicalExpressionAST,C as LoopControl,Q as MEventScope,O as MEvento,et as MEventoAsync,tt as NodeVisitor,j as ObjectExpression,k as ObjectProperty,K as ReturnAST,v as ReturnBranch,F as RootAST,h as Token,r as TokenType,D as TupleExpression,q as UnaryExpressionAST,U as WhileLoopStatement};
+function T(a,e){let t=`Invalid token ${a.type}[${a.value}] at ${a.line}, ${a.col} ${e?`: expecting ${e} token`:""}
+`;throw Error(t)}function h(a){return typeof a=="number"}function wt(a){return typeof a=="boolean"}function q(a){return typeof a=="string"}function A(a){return!(a===null||h(a)&&a===0||q(a)&&a.length===0||wt(a)&&!a)}function Tt(a){let e=0,t=0,n;if(a.length===0)return e;for(t=0;t<a.length;t++)n=a.charCodeAt(t),e=(e<<5)-e+n,e|=0;return e}var i=class{};i.id=0,i.comma=1,i.semi=2,i.numberConst=3,i.stringConst=4,i.equal=5,i.lparen=6,i.rparen=7,i.eol=8,i.eof=9,i.lbrace=10,i.rbrace=11,i.lbracket=12,i.rbracket=13,i.great=14,i.greatEq=15,i.less=16,i.lessEq=17,i.eqeq=18,i.IF=19,i.ELSE=20,i.TRUE=21,i.FALSE=22,i.NULL=23,i.not=24,i.notEq=25,i.and=26,i.or=27,i.plus=28,i.minus=29,i.div=30,i.mult=31,i.mod=32,i.invalid=33,i.colon=34,i.WHILE_TILL=35,i.FOR_LOOP=36,i.up=37,i.down=38,i.with=39,i.in=40,i.TILL=41,i.BREAK=42,i.CONTINUE=43,i.nullity=44,i.RETURN=45,i.dot=46;var l=class a{constructor(e,t,n=1,r=1){this.type=e,this.value=t,this.line=n,this.col=r}static from(e,t){return new a(e,t)}toString(){return`[${this.type.toString()}, ${this.value}]`}},c=class{};c.equal=61,c.comma=44,c.semiColon=59,c.lparen=40,c.rparen=41,c.backslash=92,c.quote=34,c.squote=39,c.plus=43,c.minus=45,c.star=42,c.slash=47,c.percent=37,c.lbrace=123,c.rbrace=125,c.lbracket=91,c.rbracket=93,c.not=33,c.great=62,c.less=60,c.and=38,c.pipe=124,c.colon=58,c.questionMark=63,c.shebang=35,c.dot=46;var J=class{constructor(e,t){this.keywords={};this.keywords={...t},this.lang=e}},k=class k{constructor(e){this._position=0;this._line=1;this._col=1;this._currentChar=-1;this._source=e,this._currentChar=this._source[this._position].charCodeAt(0),this._resolveLanguage()}get source(){return this._source}_resolveLanguage(){var t;let e=this.nextToken();if(e.type===i.less){let n=this.nextToken();n.type!==i.id&&T(e);let r=n.value.toString();this._language=(t=k.languages.find(s=>s.lang===r))!=null?t:k._defaultLanguage,e=this.nextToken(),e.type!==i.great&&T(e)}else this._language=k._defaultLanguage,this._position=0,this._currentChar=this._source[this._position].charCodeAt(0)}_advance(){if(this._position++,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col++}_jump(e){if(this._position+=e,this._position>=this._source.length){this._currentChar=-1;return}this._currentChar=this._source[this._position].charCodeAt(0),this._col+=e}_pick(){return this._position+1>=this._source.length?-1:this._source[this._position+1].charCodeAt(0)}_isId(e){return e<48?e===36:e<58?!0:e<65?!1:e<91?!0:e<97?e===95:e<123}_isIdStart(e){return e<65?e===36:e<91?!0:e<97?e===95:e<123}_id(){var o,u;let e="",t=this._col,n=this._position,r=this._line;for(;this._isId(this._currentChar);)e+=String.fromCharCode(this._currentChar),this._advance();let s=this._language&&(o=this._language.keywords[e])!=null?o:e;return(u=k.RESERVED[s])!=null?u:new l(i.id,e,r,t)}_isLineEnd(e){return e===10||e===13||[`
+`,"\r","\u2028","\u2029"].includes(String.fromCharCode(e))}_isWhiteSpace(e){return[" ","	"].includes(String.fromCharCode(e))}_isDigit(e){return e>0&&(e^48)<=9}_skipWhiteSpace(){for(;this._isWhiteSpace(this._currentChar)===!0;)this._advance()}_number(){let e="",t=this._col,n=this._position,r=this._line,s=String.fromCharCode(this._currentChar);this._advance();let o=String.fromCharCode(this._currentChar),u=10;if(s==="0"&&["b","B","x","X","o","O"].includes(o))switch(this._advance(),o.toLowerCase()){case"b":u=2;break;case"o":u=8;break;case"x":u=16;break;default:u=10}else e+=s,u=10;for(;this._isDigit(this._currentChar)||u===16&&["A","a","B","b","C","c","D","d","E","e","F","f"].includes(String.fromCharCode(this._currentChar));)e+=String.fromCharCode(this._currentChar),this._advance();if(String.fromCharCode(this._currentChar)==="."&&this._isDigit(this._pick())===!0){for(u!==10&&T(new l(i.id,o,r,n)),e+=String.fromCharCode(this._currentChar),this._advance();this._isDigit(this._currentChar);)e+=String.fromCharCode(this._currentChar),this._advance();return new l(i.numberConst,parseFloat(e),r,t)}return new l(i.numberConst,parseInt(e,u),r,t)}_literalString(e){let t="",n=-1,r=this._position,s=this._col,o=this._line;for(;this._currentChar!==-1;){let u=String.fromCharCode(this._pick());if(this._currentChar==c.backslash){switch(u){case"\\":t+="\\";break;case"0":t+="\0";break;case"a":t+="a";break;case"b":t+="\b";break;case"f":t+="\f";break;case"n":t+=`
+`;break;case"r":t+="\r";break;case"t":t+="	";break;case"u":t+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+6),16)),this._jump(4);break;case"v":t+="\v";break;case"x":t+=String.fromCharCode(Number.parseInt(this._source.substring(this._position+2,this._position+4),16)),this._jump(2);break;default:if(String.fromCharCode(e)==u)t+=String.fromCharCode(e);else{this._advance(),n=this._currentChar,t+=String.fromCharCode(this._currentChar),this._advance();continue}}this._jump(2),n=this._currentChar;continue}if(this._currentChar===e&&n!==c.backslash)break;t+=String.fromCharCode(this._currentChar),n=this._currentChar,this._advance()}return new l(i.stringConst,t,o,s)}_skipLineComment(){for(;!this._isLineEnd(this._currentChar)&&this._currentChar!=-1;)this._advance()}_skipComment(){for(;this._currentChar!==-1;){if(this._currentChar===c.star&&this._pick()===c.shebang){this._advance(),this._advance();break}this._advance()}}nextToken(){let e=this._line,t=this._col,n=this._position;for(;this._currentChar!==-1;){if(this._isLineEnd(this._currentChar))return this._line++,this._col=1,this._advance(),new l(i.eol,`
+`,e,t);if(this._isWhiteSpace(this._currentChar)){this._skipWhiteSpace();continue}if(this._currentChar==c.shebang){this._advance(),this._currentChar===c.star?(this._advance(),this._skipComment()):this._skipLineComment();continue}if(this._isDigit(this._currentChar))return this._number();if(this._isIdStart(this._currentChar))return this._id();if(this._currentChar===c.equal)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.eqeq,"==",e,t)):new l(i.equal,"=",e,t);if(this._currentChar===c.great)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.greatEq,">=",e,t)):new l(i.great,">",e,t);if(this._currentChar===c.less)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.lessEq,"<=",e,t)):new l(i.less,"<",e,t);if(this._currentChar===c.semiColon)return this._advance(),new l(i.semi,";",e,t);if(this._currentChar===c.lparen)return this._advance(),new l(i.lparen,"(",e,t);if(this._currentChar===c.rparen)return this._advance(),new l(i.rparen,")",e,t);if(this._currentChar===c.comma)return this._advance(),new l(i.comma,",",e,t);if(this._currentChar===c.lbrace)return this._advance(),new l(i.lbrace,"{",e,t);if(this._currentChar===c.rbrace)return this._advance(),new l(i.rbrace,"}",e,t);if(this._currentChar===c.lbracket)return this._advance(),new l(i.lbracket,"[",e,t);if(this._currentChar===c.rbracket)return this._advance(),new l(i.rbracket,"]",e,t);if(this._currentChar===c.plus)return this._advance(),new l(i.plus,"+",e,t);if(this._currentChar===c.minus)return this._advance(),new l(i.minus,"-",e,t);if(this._currentChar===c.slash)return this._advance(),new l(i.div,"/",e,t);if(this._currentChar===c.star)return this._advance(),new l(i.mult,"*",e,t);if(this._currentChar===c.percent)return this._advance(),new l(i.mod,"%",e,t);if(this._currentChar===c.colon)return this._advance(),new l(i.colon,":",e,t);if(this._currentChar===c.dot)return this._advance(),new l(i.dot,".",e,t);if(this._currentChar===c.not)return this._advance(),this._currentChar===c.equal?(this._advance(),new l(i.notEq,"!=",e,t)):new l(i.not,"!",e,t);if(this._currentChar===c.and&&this._pick()===c.and)return this._advance(),this._advance(),new l(i.and,"&&",e,t);if(this._currentChar===c.pipe&&this._pick()===c.pipe)return this._advance(),this._advance(),new l(i.or,"||",e,t);if(this._currentChar===c.questionMark&&this._pick()===c.questionMark)return this._advance(),this._advance(),new l(i.nullity,"??",e,t);if(this._currentChar===c.quote||this._currentChar===c.squote){let r=this._currentChar;this._advance();let s=this._literalString(r);return this._advance(),s}return new l(i.invalid,String.fromCharCode(this._currentChar),e,t)}return new l(i.eof,"",e,t)}};k._defaultLanguage=new J("en",{if:"if",else:"else",true:"true",false:"false",null:"null",while:"while",for:"for",with:"with",up:"up",down:"down",till:"till",in:"in",break:"break",continue:"continue",return:"return"}),k.languages=[k._defaultLanguage,new J("fr",{si:"if",sinon:"else",vrai:"true",faux:"false",nul:"null",tanque:"while",pour:"for",avec:"with",mont:"up",desc:"down",jusqua:"till",dans:"in",couper:"break",continuer:"continue",returner:"return"}),new J("bm",{nii:"if",note:"else",tien:"true",galon:"false",gansan:"null",foo:"while",seginka:"for",niin:"with",kay:"up",kaj:"down",kata:"till",kono:"in",tike:"break",ipan:"continue",segin:"return"})],k.RESERVED={if:l.from(i.IF,"if"),else:l.from(i.ELSE,"else"),true:l.from(i.TRUE,!0),false:l.from(i.FALSE,!1),null:l.from(i.NULL,null),for:l.from(i.FOR_LOOP,"for"),while:l.from(i.WHILE_TILL,"while"),with:l.from(i.with,"with"),up:l.from(i.up,"up"),down:l.from(i.down,"down"),till:l.from(i.TILL,"till"),in:l.from(i.in,"in"),break:l.from(i.BREAK,"break"),continue:l.from(i.CONTINUE,"continue"),return:l.from(i.RETURN,"return")};var ht=k,v=class{constructor(e,t){this.line=e,this.col=t}dump(){return this.toString()}},S=class a extends Error{constructor(e,t,n,r,s,o){var u;super(a.format(e,t,n,r)),this.name="MEventoRuntimeError",this.detail=e,this.line=t,this.col=n,this.nodeType=r,this.cause=s,this.code=(u=o==null?void 0:o.code)!=null?u:"runtime_error",this.diagnosticName=o==null?void 0:o.name,this.argCount=o==null?void 0:o.argCount,this.minArgs=o==null?void 0:o.minArgs,this.maxArgs=o==null?void 0:o.maxArgs,this.argIndex=o==null?void 0:o.argIndex,this.expectedType=o==null?void 0:o.expectedType,this.actualType=o==null?void 0:o.actualType,this.stepCount=o==null?void 0:o.stepCount,this.maxSteps=o==null?void 0:o.maxSteps}static fromNode(e,t){if(t instanceof a)return t;let n=t instanceof Error?t.message:String(t);return new a(n,e.line,e.col,e.constructor.name,t)}static format(e,t,n,r){let s=t!=null&&n!=null?` at ${t}:${n}`:"",o=r?` [${r}]`:"";return`MEvento runtime error${s}${o}: ${e}`}diagnostic(){return{code:this.code,message:this.detail,line:this.line,col:this.col,node:this.nodeType,name:this.diagnosticName,argCount:this.argCount,minArgs:this.minArgs,maxArgs:this.maxArgs,argIndex:this.argIndex,expectedType:this.expectedType,actualType:this.actualType,stepCount:this.stepCount,maxSteps:this.maxSteps}}};function g(a,e){var r;let t={name:a,minArgs:e==null?void 0:e.minArgs,maxArgs:e==null?void 0:e.maxArgs,tags:e!=null&&e.tags?Array.from(e.tags):[],args:e!=null&&e.args?e.args.map(kt):[],returnType:(r=e==null?void 0:e.returnType)!=null?r:"any"};if(t.minArgs!=null&&t.minArgs<0)throw new Error("minArgs must be greater than or equal to 0");if(t.maxArgs!=null&&t.maxArgs<0)throw new Error("maxArgs must be greater than or equal to 0");let n=Q(t);if(n!=null&&t.maxArgs!=null&&n>t.maxArgs)throw new Error("minArgs must be less than or equal to maxArgs");if(!St.has(t.returnType))throw new Error(`Unsupported return type '${t.returnType}'`);return t}function kt(a){var t,n;let e={name:a.name,type:(t=a.type)!=null?t:"any",required:(n=a.required)!=null?n:!0};if(!Ct.has(e.type))throw new Error(`Unsupported argument type '${e.type}'`);return e}var St=new Set(["any","null","boolean","number","string","array","object"]),Ct=St;function Mt(a){var t,n;let e={maxSteps:a==null?void 0:a.maxSteps,trace:(t=a==null?void 0:a.trace)!=null?t:!1,compatV1:(n=a==null?void 0:a.compatV1)!=null?n:!1};if(e.maxSteps!=null&&(!Number.isInteger(e.maxSteps)||e.maxSteps<=0))throw new Error("maxSteps must be a positive integer");return e}function bt(a){var t,n;let e={name:a.name,type:(t=a.type)!=null?t:"any",required:(n=a.required)!=null?n:!0};if(!St.has(e.type))throw new Error(`Unsupported value type '${e.type}'`);return e}function Lt(a){var e;return{name:a.name,minArgs:a.minArgs,maxArgs:a.maxArgs,tags:a.tags?Array.from(a.tags):[],args:a.args?a.args.map(t=>({...t})):[],returnType:(e=a.returnType)!=null?e:"any"}}function xt(a){return Object.fromEntries(Object.entries(a).map(([e,t])=>[e,Lt(t)]))}function pt(a,e){let t=Q(a);return!(t!=null&&e<t||a.maxArgs!=null&&e>a.maxArgs)}function Q(a){var n;let e=0;if(a.args){for(let r=a.args.length-1;r>=0;r-=1)if((n=a.args[r].required)==null||n){e=r+1;break}}let t=[a.minArgs,e>0?e:void 0].filter(r=>r!=null);return t.length>0?Math.max(...t):void 0}function ft(a){let e=Q(a);return e==null&&a.maxArgs==null?"any number of":e!=null&&a.maxArgs!=null&&e===a.maxArgs?String(e):e!=null&&a.maxArgs!=null?`${e}..${a.maxArgs}`:e!=null?`at least ${e}`:`at most ${a.maxArgs}`}function Z(a){return a==null?"null":typeof a=="boolean"?"boolean":typeof a=="number"?"number":typeof a=="string"?"string":Array.isArray(a)?"array":"object"}var j=class extends v{constructor(e,t,n){super(1,1),this.body=e,this.name=t,this.source=n}dump(){let e=`Module ${this.name} Start {`;for(let t of this.body)e+=`${t.dump()}
+`;return e+="}",e}},R=class extends v{constructor(e,t){super(t.line,t.col),this.body=e}toString(){return`{
+${this.body.map(e=>e.toString()).join(`
+`)}}`}},E=class extends v{constructor(e){super(e.line,e.col),this.value=e.value.toString()}toString(){return this.value}},x=class extends v{constructor(e,t){super(e.line,e.col),this.value=e.value,this.raw=t}toString(){return this.value.toString()}},L=class extends v{constructor(e,t){super(e.line,e.col),this.identifier=e,this.init=t}toString(){return`${this.identifier} = ${this.init}`}},X=class extends v{constructor(e){super(e.line,e.col),this.expression=e}toString(){return this.expression.toString()}},P=class extends v{constructor(e,t){super(e.line,e.col),this.callee=e,this.arguments=t}toString(){return`${this.callee.toString()}(...${this.arguments.length})`}},z=class extends v{constructor(e,t,n){super(e.line,e.col),this.left=e,this.operation=t,this.right=n}toString(){return`${this.left} ${this.operation} ${this.right}`}},U=class extends v{constructor(e,t){super(e.line,e.col),this.operation=e,this.argument=t}toString(){return`${this.operation} ${this.argument}`}},W=class extends v{constructor(e,t,n){super(e.line,e.col),this.test=e,this.consequent=t,this.alternate=n}toString(){return`if ${this.test} ${this.consequent} ${this.alternate?`else ${this.alternate} `:""}`}},B=class extends v{constructor(e,t,n){super(e.line,e.col),this.left=e,this.operator=t,this.right=n}toString(){return`${this.left} ${this.operator.value} ${this.right}`}},w=class extends v{constructor(t,n,r=!1){super(t.line,t.col);this.computed=!1;this.owner=t,this.key=n,this.computed=r}toString(){return`${this.owner}[${this.key}]`}},$=class extends v{constructor(e,t,n){super(t==null?void 0:t.line,t==null?void 0:t.col),this.properties=e}toString(){return"{...}"}},F=class extends v{constructor(e,t,n){super(t==null?void 0:t.line,t==null?void 0:t.col),this.elements=e}toString(){return"[...]"}},O=class extends v{constructor(e,t){super(e.line,e.col),this.value=t,this.key=e}},D=class extends v{constructor(t,n,r,s,o=!1){super(r==null?void 0:r.line,r==null?void 0:r.col);this.retain=!1;this.test=t,this.body=n,this.retain=o}},K=class extends v{constructor(t,n,r,s,o,u,p,f=!1){super(u==null?void 0:u.line,u==null?void 0:u.col);this.init=t;this.test=n;this.update=r;this.direction=s;this.body=o;this.retain=f}},H=class extends v{constructor(t,n,r,s,o,u=!1){super(s==null?void 0:s.line,s==null?void 0:s.col);this.identifier=t;this.collection=n;this.body=r;this.retain=u}},I=class extends v{constructor(t,n){super(t.line,t.col);this.first=t;this.second=n}},et=class extends v{constructor(e,t){super(e,t)}},Y=class extends v{constructor(e,t,n){super(t,n),this.value=e}},nt=class extends v{constructor(e,t){super(e,t)}};function Ot(a){return a instanceof j?"RootAST":a instanceof R?"BlockStatementAST":a instanceof E?"IdentifierAST":a instanceof x?"LiteralAST":a instanceof L?"AssignmentExpressionAST":a instanceof X?"ExpressionStatementAST":a instanceof P?"CallExpressionAST":a instanceof z?"BinaryExpressionAST":a instanceof U?"UnaryExpressionAST":a instanceof W?"IfStatementAST":a instanceof B?"LogicalExpressionAST":a instanceof w?"IndexAccessorAST":a instanceof $?"ObjectExpression":a instanceof O?"ObjectProperty":a instanceof F?"ArrayExpression":a instanceof D?"WhileLoopStatement":a instanceof K?"ForLoopStatement":a instanceof H?"ForOfStatement":a instanceof I?"TupleExpression":a instanceof et?"BreakAST":a instanceof Y?"ReturnAST":a instanceof nt?"ContinueAST":a.constructor.name}var mt=class{constructor(e=1/0){this.capacity=e;this.storage=[]}push(e){if(this.size()===this.capacity)throw Error("Stack has reached max capacity, you cannot add more items");this.storage.push(e)}pop(){return this.storage.pop()}peek(){return this.storage[this.size()-1]}size(){return this.storage.length}get isEmpty(){return this.storage.length===0}},tt=class tt{constructor(e){this._loopTrack=new mt;this.currentToken=e.nextToken(),this.lexer=e}_eat(e){var t;((t=this.currentToken)==null?void 0:t.type)===e?this.currentToken=this.lexer.nextToken():T(this.currentToken,e)}_eatEOL(){var e;for(;((e=this.currentToken)==null?void 0:e.type)===i.eol;)this._eat(i.eol)}_eatSemiOrEOL(){var e,t;for(;((e=this.currentToken)==null?void 0:e.type)===i.eol||((t=this.currentToken)==null?void 0:t.type)===i.semi;)this._eat(this.currentToken.type)}_eatSemi(){var e;for(;((e=this.currentToken)==null?void 0:e.type)===i.semi;)this._eat(i.semi)}_variable(){let e=new E(this.currentToken);return this._eat(i.id),e}_return(){let e=this.currentToken,t;return!this._expect(i.eol)&&!this._expect(i.semi)&&(t=this._expression()),new Y(t,e==null?void 0:e.line,e==null?void 0:e.col)}_factor(){let e=this.currentToken;switch(e.type){case i.plus:case i.minus:case i.not:return this._eat(this.currentToken.type),new U(e,this._term());case i.numberConst:return this._eat(i.numberConst),new x(e,e.value.toString());case i.stringConst:return this._eat(i.stringConst),new x(e,e.value.toString());case i.lparen:this._eat(i.lparen);let t=this._expression();return this._eat(i.rparen),t;case i.TRUE:case i.FALSE:return this._eat(this.currentToken.type),new x(e,e.value.toString());case i.NULL:return this._eat(i.NULL),new x(e,"null");case i.lbracket:return this._arrayExpression();case i.lbrace:return this._objectExpression();case i.IF:return this._ifStatement();case i.WHILE_TILL:return this._whileLoop(!0);case i.FOR_LOOP:return this._forLoop(!0);case i.BREAK:return this._breakExpression();case i.CONTINUE:return this._continueExpression();default:return this._variable()}}_breakExpression(){var e,t;return this._loopTrack.isEmpty&&T(this.currentToken),this._eat(i.BREAK),new et((e=this.currentToken)==null?void 0:e.line,(t=this.currentToken)==null?void 0:t.col)}_continueExpression(){var e,t;return this._loopTrack.isEmpty&&T(this.currentToken),this._eat(i.CONTINUE),new nt((e=this.currentToken)==null?void 0:e.line,(t=this.currentToken)==null?void 0:t.col)}_term(){let e=this._factor();return e=this._tryParsingFunctionCall(e),e=this._tryParsingMemberExpression(e),e}_expression(){let e=this._term();for(e=this._tryBinaryExpression(0,e);[i.and,i.or,i.nullity].includes(this.currentToken.type);){let t=this.currentToken;this._eat(t.type),e=new B(e,t,this._expression())}if(this._expect(i.equal))if(e instanceof E||e instanceof w){let t=this.currentToken;this._eat(i.equal),e=new L(e,this._expression())}else throw new Error("Unexpected token");return e}_objectProperty(){var r;let e;switch((r=this.currentToken)==null?void 0:r.type){case i.stringConst:{e=new x(this.currentToken,this.currentToken.value),this._eat(i.stringConst);break}case i.lbracket:{this._eat(i.lbracket);var t=this._expression();this._eat(i.rbracket),e=t;break}case i.id:{let s=this._variable();e=new x(new l(i.id,s.value,s.line,s.col),s.value);break}default:throw`Unexpected token ${this.currentToken}`}this._eat(i.colon);var n=this._expression();return new O(e,n)}_property(){return this._objectProperty()}_objectProperties(){var t,n;let e=[];for(((t=this.currentToken)==null?void 0:t.type)!=i.rbrace&&(this._eatEOL(),e.push(this._property()),this._eatEOL());((n=this.currentToken)==null?void 0:n.type)===i.comma&&(this._eat(i.comma),this._eatEOL(),!this._expect(i.rbrace));)e.push(this._property()),this._eatEOL();return e}_objectExpression(e){var t=e!=null?e:this.currentToken;e||this._eat(i.lbrace);var n=this._objectProperties();return this._eat(i.rbrace),new $(n,t,this.currentToken)}_arrayExpression(){this._eat(i.lbracket);let e=this._expect(i.rbracket)?[]:this._expressionsList();this._eat(i.rbracket);var t=e.length!==0?e[0]:void 0,n=e.length!==0?e[e.length-1]:void 0;return new F(e,t,n)}_tryParsingMemberExpression(e){let t=e;for(;this.currentToken.type===i.lbracket||this.currentToken.type===i.dot;)if(this.currentToken.type===i.lbracket){this._eat(i.lbracket);let n=this._expression();t=new w(t,n,!0),this._eat(i.rbracket)}else{this._eat(i.dot);let n=this.currentToken;n.type!==i.id&&T(n);let r=new x(new l(i.stringConst,n.value,n.line,n.col),n.value);this._eat(i.id),t=new w(t,r)}return t}_tryBinaryExpression(e,t){let n=t;for(;;){let r=tt._binopPrecdences[this.currentToken.type]||-1;if(r<e)return n;let s=this.currentToken;this._eat(s.type);let o=this._term(),u=tt._binopPrecdences[this.currentToken.type]||-1;if(r<u){let p=this._tryBinaryExpression(r+1,o);if(p===n)return p;o=p}n=new z(n,s,o)}}_expressionsList(){var n;this._eatEOL();let e=this._expression();this._eatEOL();let t=[e];for(;((n=this.currentToken)==null?void 0:n.type)===i.comma&&(this._eat(i.comma),this._eatEOL(),!this._expect(i.rbracket));)e=this._expression(),t.push(e),this._eatEOL();return t}_callExpression(e){this._eat(i.lparen);let t=[];return this._expect(i.rparen)||(t=this._expressionsList()),this._eat(i.rparen),e instanceof E||T(this.currentToken),new P(e,t)}_tryParsingFunctionCall(e){let t=e;for(;this.currentToken.type===i.lparen;)t=this._callExpression(t);return t}_statementExpression(){let e=this._expression();return[i.semi,i.eol,i.eof].includes(this.currentToken.type)||T(this.currentToken),e}_blockStatement(e=!1){var n;if(e||this._eat(i.lbrace),this._eatEOL(),this._expect(i.rbrace))return this._eat(i.rbrace),new R([],this.currentToken);let t=[this._statement()];for(;this._eatSemiOrEOL(),!(this.currentToken.type===i.rbrace||this.currentToken.type===i.eof||(t.push(this._statement()),this._expect(i.rbrace)));)this.currentToken.type!==i.eol&&this.currentToken.type!==i.semi&&this.currentToken.type!==i.eof&&T(this.currentToken);return this._eat(i.rbrace),((n=this.currentToken)==null?void 0:n.type)===i.rbrace&&this._eat(i.rbrace),new R(t,this.currentToken)}_ifStatement(){this._eat(i.IF);let e=this.currentToken.type===i.lparen;e&&this._eat(i.lparen);let t=this._expression();e&&this._eat(i.rparen);let n;this.currentToken.type===i.lbrace?n=this._blockStatement():n=this._expression();let r;if(this.currentToken.type===i.ELSE)switch(this._eat(i.ELSE),this.currentToken.type){case i.IF:r=this._ifStatement();break;case i.lbrace:r=this._blockStatement();break;default:r=this._expression()}return new W(t,n,r)}_pushLoop(){this._loopTrack.push(!0)}_popLoop(){this._loopTrack.pop()}_whileLoop(e=!1){let t=this.currentToken;this._eat(i.WHILE_TILL),this._pushLoop();let n=this._expression(),r=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();return this._popLoop(),new D(n,r,t,this.currentToken,e)}_forOfIdentifier(){switch(this.currentToken.type){case i.lparen:{this._eat(i.lparen);let e=this._variable();this._eat(i.comma);let t=this._variable();return this._eat(i.rparen),new I(e,t)}default:return this._variable()}}_forLoop(e=!1){let t=this.currentToken;this._eat(i.FOR_LOOP),this._pushLoop();let n=[i.lparen].includes(this.currentToken.type),r;if(n)r=this._forOfIdentifier();else{let s=this._expression();s instanceof L||(n=!0),r=s}if(!n&&r instanceof L){this._eat(i.TILL);let s=this._expression(),o;if(this.currentToken.type===i.up||this.currentToken.type===i.down){let f=this.currentToken;this._eat(f.type),o=f}else o=new l(i.up,"up");let u;this._expect(i.with)?(this._eat(i.with),u=this._expression()):u=new x(new l(i.numberConst,1,this.currentToken.line,this.currentToken.col),"1");let p=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();r=new K(r,s,u,o,p,t,this.currentToken,e),this._popLoop()}else if(n){this._eat(i.in);let s=this._expression(),o=this.currentToken.type===i.lbrace?this._blockStatement():this._expression();r=new H(r,s,o,t,this.currentToken,e),this._popLoop()}else T(this.currentToken);return r}_statement(){switch(this.currentToken.type){case i.BREAK:return this._breakExpression();case i.CONTINUE:return this._continueExpression();case i.RETURN:return this._eat(i.RETURN),this._return();case i.semi:return this._eatSemi(),this._statement();case i.eol:return this._eatEOL(),this._statement();case i.WHILE_TILL:return this._whileLoop();case i.FOR_LOOP:return this._forLoop();default:return this._statementExpression()}}_expect(e){var t;return((t=this.currentToken)==null?void 0:t.type)===e}_definition(){if(this._eatSemiOrEOL(),this._expect(i.eof))return[];let e=[this._statement()];for(;;){if(this._eatSemiOrEOL(),this.currentToken.type===i.eof){this._eat(i.eof);break}this.currentToken.type===i.lbrace?e.push(this._blockStatement()):e.push(this._statement())}return e}_root(){let e=this.lexer.source,t="<module>",n=this._definition();return new j(n,t,e)}parse(){return this._root()}};tt._binopPrecdences={[i.eqeq]:10,[i.notEq]:10,[i.great]:10,[i.greatEq]:10,[i.less]:10,[i.lessEq]:10,[i.plus]:20,[i.minus]:20,[i.mult]:40,[i.div]:40,[i.mod]:40};var vt=tt,V=class{},C=class extends V{},M=class extends V{},y=class{constructor(e){this.value=e}},gt=class{constructor(){this._nodesVisitors={}}registerVisitor(e,t){let n=`visit${e.name}`;this._nodesVisitors[n]=t}},_t=class extends gt{constructor(){super(),this.registerVisitor(j,this.visitRootAST),this.registerVisitor(R,this.visitBlockStatementAST),this.registerVisitor(E,this.visitIdentifierAST),this.registerVisitor(x,this.visitLiteralAST),this.registerVisitor(L,this.visitAssignmentExpressionAST),this.registerVisitor(X,this.visitExpressionStatementAST),this.registerVisitor(P,this.visitCallExpressionAST),this.registerVisitor(z,this.visitBinaryExpressionAST),this.registerVisitor(U,this.visitUnaryExpressionAST),this.registerVisitor(W,this.visitIfStatementAST),this.registerVisitor(B,this.visitLogicalExpressionAST),this.registerVisitor(w,this.visitIndexAccessorAST),this.registerVisitor(O,this.visitObjectProperty),this.registerVisitor($,this.visitObjectExpression),this.registerVisitor(F,this.visitArrayExpression),this.registerVisitor(D,this.visitWhileLoopStatement),this.registerVisitor(K,this.visitForLoopStatement),this.registerVisitor(H,this.visitForOfStatement),this.registerVisitor(et,this.visitBreakAST),this.registerVisitor(nt,this.visitContinueAST),this.registerVisitor(Y,this.visitReturnAST)}visit(e){this.beforeVisit(e);let t=`visit${e.constructor.name}`,n=this._nodesVisitors[t];if(!n)throw new S(`No ${t} declared`,e.line,e.col,e.constructor.name);try{let r=n.call(this,e);return r&&typeof r.then=="function"?r.catch(s=>{throw S.fromNode(e,s)}):r!=null?r:null}catch(r){throw S.fromNode(e,r)}}beforeVisit(e){}assignProperty(e,t,n){(Array.isArray(e)||typeof e=="object")&&(e[t]=n)}},ot=class{constructor(e,t,n){this.memory={};this.name=e,this.memory=t,this.parent=n}resolve(e){var t,n;return Object.keys(this.memory).includes(e)?this.memory[e]:(n=(t=this.parent)==null?void 0:t.resolve(e))!=null?n:null}change(e,t,n=!0){return Object.keys(this.memory).includes(e)?(this.memory[e]=t,!0):this.parent&&this.parent.change(e,t,!1)?!0:n?(this.memory[e]=t,!0):!1}},rt={_ok_:g("_ok_",{name:"_ok_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"boolean"}),_err_:g("_err_",{name:"_err_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"boolean"}),_value_:g("_value_",{name:"_value_",minArgs:1,maxArgs:2,args:[{name:"result"},{name:"fallback",required:!1}],returnType:"any"}),_error_:g("_error_",{name:"_error_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"object"}),_code_:g("_code_",{name:"_code_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"string"}),_message_:g("_message_",{name:"_message_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"string"}),_unwrap_:g("_unwrap_",{name:"_unwrap_",minArgs:1,maxArgs:1,args:[{name:"result"}],returnType:"any"}),_len_:g("_len_",{name:"_len_",minArgs:1,maxArgs:1,args:[{name:"target"}],returnType:"number"}),_push_:g("_push_",{name:"_push_",minArgs:2,maxArgs:2,args:[{name:"array",type:"array"},{name:"value"}],returnType:"array"}),_pop_:g("_pop_",{name:"_pop_",minArgs:1,maxArgs:1,args:[{name:"array",type:"array"}],returnType:"any"}),_insert_:g("_insert_",{name:"_insert_",minArgs:3,maxArgs:3,args:[{name:"array",type:"array"},{name:"index",type:"number"},{name:"value"}],returnType:"array"}),_remove_at_:g("_remove_at_",{name:"_remove_at_",minArgs:2,maxArgs:2,args:[{name:"array",type:"array"},{name:"index",type:"number"}],returnType:"any"}),_has_:g("_has_",{name:"_has_",minArgs:2,maxArgs:2,args:[{name:"object",type:"object"},{name:"key"}],returnType:"boolean"}),_keys_:g("_keys_",{name:"_keys_",minArgs:1,maxArgs:1,args:[{name:"object",type:"object"}],returnType:"array"}),_values_:g("_values_",{name:"_values_",minArgs:1,maxArgs:1,args:[{name:"object",type:"object"}],returnType:"array"})};function it(a){return typeof a=="object"&&a!=null&&a.ok===!0}function at(a){if(typeof a!="object"||a==null)return;let e=a;if(!(e.ok!==!1||typeof e.error!="object"||e.error==null))return e.error}function N(a){return typeof a=="number"?a:void 0}function G(a){return typeof a=="string"?a:void 0}function Nt(a){var t,n;let e=at(a);return new S((t=G(e==null?void 0:e.message))!=null?t:"Cannot unwrap failed _try_ result",N(e==null?void 0:e.line),N(e==null?void 0:e.col),G(e==null?void 0:e.node),void 0,{code:(n=G(e==null?void 0:e.code))!=null?n:"invalid_try_result",name:G(e==null?void 0:e.name),argCount:N(e==null?void 0:e.argCount),minArgs:N(e==null?void 0:e.minArgs),maxArgs:N(e==null?void 0:e.maxArgs),argIndex:N(e==null?void 0:e.argIndex),expectedType:G(e==null?void 0:e.expectedType),actualType:G(e==null?void 0:e.actualType),stepCount:N(e==null?void 0:e.stepCount),maxSteps:N(e==null?void 0:e.maxSteps)})}function ct(a,e,t,n){let r=Z(n);return new S(`Function '${a}' argument ${e} expects ${t}, got ${r}`,void 0,void 0,void 0,void 0,{code:"invalid_argument_type",name:a,argIndex:e,expectedType:t,actualType:r})}function st(a,e,t){let n=e[t];if(Array.isArray(n))return n;throw ct(a,t,"array",n)}function lt(a,e,t){let n=e[t];if(typeof n=="object"&&n!=null&&!Array.isArray(n))return n;throw ct(a,t,"object",n)}function Et(a,e,t){let n=e[t];if(typeof n=="number")return Math.trunc(n);throw ct(a,t,"number",n)}function It(a,e,t){return new S(`Function '${a}' index ${e} is out of range for array of length ${t}`,void 0,void 0,void 0,void 0,{code:"index_out_of_range",name:a})}var $t={_ok_:a=>it(a[0]),_err_:a=>!it(a[0]),_value_:a=>{var e,t;return it(a[0])?(e=a[0].value)!=null?e:null:(t=a[1])!=null?t:null},_error_:a=>{var e;return(e=at(a[0]))!=null?e:null},_code_:a=>{var e,t;return(t=(e=at(a[0]))==null?void 0:e.code)!=null?t:null},_message_:a=>{var e,t;return(t=(e=at(a[0]))==null?void 0:e.message)!=null?t:null},_unwrap_:a=>{var e;if(it(a[0]))return(e=a[0].value)!=null?e:null;throw Nt(a[0])},_len_:a=>{let e=a[0];if(Array.isArray(e)||typeof e=="string")return e.length;if(typeof e=="object"&&e!=null)return Object.keys(e).length;throw ct("_len_",0,"array|object|string",e)},_push_:a=>{var t;let e=st("_push_",a,0);return e.push((t=a[1])!=null?t:null),e},_pop_:a=>{var t;let e=st("_pop_",a,0);return e.length===0?null:(t=e.pop())!=null?t:null},_insert_:a=>{var n;let e=st("_insert_",a,0),t=Et("_insert_",a,1);if(t<0||t>e.length)throw It("_insert_",t,e.length);return e.splice(t,0,(n=a[2])!=null?n:null),e},_remove_at_:a=>{var n;let e=st("_remove_at_",a,0),t=Et("_remove_at_",a,1);return t<0||t>=e.length?null:(n=e.splice(t,1)[0])!=null?n:null},_has_:a=>Object.prototype.hasOwnProperty.call(lt("_has_",a,0),a[1]),_keys_:a=>Object.keys(lt("_keys_",a,0)),_values_:a=>Object.values(lt("_values_",a,0))},d=class d extends _t{constructor(t){super();this.rootScope=new ot("Program",{});this.currentScope=this.rootScope;this.debug=!1;this._functionsRegistry={};this._functionSpecs={};this._executionStepCount=0;this._traceEvents=[];this._options=Mt(t),this._functionsRegistry={...$t,...d._globalFunctionsRegistry},this._functionSpecs={...rt,...d._globalFunctionSpecs}}get options(){return{...this._options}}get executionStepCount(){return this._executionStepCount}trace(){return this._traceEvents.map(t=>({...t,detail:{...t.detail}}))}resetExecutionBudget(){this._executionStepCount=0}beforeVisit(t){this._executionStepCount+=1,this.recordTrace("visit",t);let n=this._options.maxSteps;if(n!=null&&this._executionStepCount>n)throw new S(`Execution budget exceeded after ${this._executionStepCount} step(s)`,t.line,t.col,t.constructor.name,void 0,{code:"execution_budget_exceeded",stepCount:this._executionStepCount,maxSteps:n})}clearTrace(){this._traceEvents=[]}recordTrace(t,n,r,s={}){this._options.trace&&this._traceEvents.push({kind:t,line:n.line,col:n.col,node:Ot(n),name:r,stepCount:this._executionStepCount,detail:s})}resolve(t){var n,r;return(r=(n=this.currentScope)==null?void 0:n.resolve(t))!=null?r:null}changeVariable(t,n){var r;return(r=this.currentScope)!=null&&r.change(t,n)?n:null}pushScope(t){let n=new ot(t,{},this.currentScope);this.currentScope=n}popScope(){var t;this.currentScope=(t=this.currentScope)==null?void 0:t.parent}log(t){this.debug&&console.log(t)}successResult(t){return{ok:!0,value:t,error:null}}errorResult(t){return{ok:!1,value:null,error:t.diagnostic()}}visitRootAST(t){var s;let n=t.body,r;for(let o of n)if(r=this.visit(o),r instanceof y)return(s=r.value)!=null?s:null;return r!=null?r:null}visitBlockStatementAST(t){let n=t.body,r;this.pushScope("Block");for(let s of n)if(r=this.visit(s),r instanceof V||r instanceof y)break;return this.popScope(),r!=null?r:null}visitIdentifierAST(t){var r;let n=t.value;return(r=this==null?void 0:this.resolve(n))!=null?r:null}visitLiteralAST(t){return t.value}visitAssignmentExpressionAST(t){let n=t.identifier,r=t.init,s=null;if(n instanceof w){var o=this.visit(n.owner);s=this.visit(t.init);var u=this.visit(n.key);this.assignProperty(o,u,s)}else n instanceof E&&(s=this.visit(r),this.changeVariable(n.value,s));return s}visitExpressionStatementAST(t){let n=t.expression;return this.visit(n)}visitCallExpressionAST(t){var m,_;let n=t.callee,r=t.arguments,s=n.value;if(s==="_try_"){if(r.length!==1)throw new S("_try_ expects exactly one expression",t.line,t.col,t.constructor.name,void 0,{code:"invalid_try_arity",name:"_try_",argCount:r.length,minArgs:1,maxArgs:1});try{let b=this.visit(r[0]);return b instanceof V||b instanceof y?b:this.successResult(b)}catch(b){if(b instanceof S)return this.errorResult(b);throw b}}let o=this.resolveFunction(s);if(!o){if(this._options.compatV1)return null;throw new S(`Unknown function '${s}'`,t.line,t.col,t.constructor.name,void 0,{code:"unknown_function",name:s})}let u=this.resolveFunctionSpec(s);if(u&&!pt(u,r.length))throw new S(`Function '${s}' expects ${ft(u)} argument(s), got ${r.length}`,t.line,t.col,t.constructor.name,void 0,{code:"invalid_function_arity",name:s,argCount:r.length,minArgs:Q(u),maxArgs:u.maxArgs});let p=r.map(b=>this.visit(b));u&&this.validateRuntimeArgumentTypes(t,u,p),this.recordTrace("call",t,s,{argCount:p.length,returnType:(m=u==null?void 0:u.returnType)!=null?m:"any"});let f=o(p,this);return this.recordTrace("call_result",t,s,{returnType:(_=u==null?void 0:u.returnType)!=null?_:"any",actualType:Z(f)}),f}visitBinaryExpressionAST(t){let n=t.left,r=t.right,s=t.operation,o=this.visit(n),u=this.visit(r);switch(s.type){case i.plus:return h(o)&&h(u)?o+u:`${o}${u}`;case i.minus:if(h(o)&&h(u))return o-u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.mult:if(h(o)&&h(u))return o*u;if(q(o)&&h(u))return o.repeat(u);if(h(o)&&q(u))return u.repeat(o);throw new Error(`Operation ${s.value} not allowed no num value`);case i.div:if(h(o)&&h(u)){if(u===0)throw new Error("Invalid division by 0");return o/u}throw new Error(`Operation ${s.value} not allowed no num value`);case i.mod:if(h(o)&&h(u))return o%u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.great:if(h(o)&&h(u))return o>u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.greatEq:if(h(o)&&h(u))return o>=u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.less:if(h(o)&&h(u))return o<u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.lessEq:if(h(o)&&h(u))return o<=u;throw new Error(`Operation ${s.value} not allowed no num value`);case i.eqeq:return o===u;case i.notEq:return o!==u;default:throw new Error(`Operation ${s.value} not allowed no num value`)}}visitUnaryExpressionAST(t){let n=t.argument,r=t.operation,s=this.visit(n);if(r.type===i.not)return A(s)===!1;if(!h(s))throw new Error(`Operation ${r.value} not allowed no num value`);if(r.type===i.plus)return s;if(r.type===i.minus)return-s;throw new Error(`Operation ${r.value} not allowed no num value`)}visitIfStatementAST(t){let n=t.test,r=this.visit(n);return A(r)?this.visit(t.consequent):t.alternate?this.visit(t.alternate):null}visitLogicalExpressionAST(t){let n=t.left,r=this.visit(n);if(t.operator.type===i.nullity)return r!=null?r:this.visit(t.right);let s=A(r);return t.operator.type===i.and?s?A(this.visit(t.right)):!1:t.operator.type===i.or?s?!0:A(this.visit(t.right)):null}visitIndexAccessorAST(t){var s,o;let n=t.owner,r=this.visit(n);if(r==null)return null;if(Array.isArray(r)){let u=this.visit(t.key);return h(u)&&Number.isInteger(u)&&r.length>u&&u>=0&&(s=r[u])!=null?s:null}else if(typeof r=="object"){let u=this.visit(t.key);return(o=r[u])!=null?o:null}return null}visitObjectProperty(t){}visitObjectExpression(t){let n={},r=t;for(let s of r.properties)if(s instanceof O){let o=this.visit(s.key);o=q(o)?o:o.toString(),n[o]=this.visit(s.value)}return n}visitArrayExpression(t){let n=t;return this.resolveArguments(n.elements)}visitBreakAST(t){return new C}visitWhileLoopStatement(t){this.log(`WhileLoopStatement ${t.test} ${t.body}`);let n=t.retain?[]:void 0;for(;A(this.visit(t.test));){let r=this.visit(t.body);if(r instanceof C)break;if(!(r instanceof M)){if(r instanceof y)return this.popScope(),r;n==null||n.push(r)}}return n!=null?n:null}visitForLoopStatement(t){let n=t.retain?[]:void 0,r=t.init.identifier;if(!(r instanceof E))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let s=this.visit(t.init.init);this.changeVariable(r.value,s);let o=()=>{let p=this.visit(t.test);if(h(p)){let f=this.resolve(r.value);return t.direction.type===i.up?p>=f:p<=f}return A(p)},u=()=>{let p=this.visit(t.update);if(h(p)){let f=this.resolve(r.value);if(!h(f))throw Error("Cant update value");this.changeVariable(r.value,t.direction.type===i.up?f+p:f-p)}else throw Error("Update value cant be non number")};for(;o();){let p=this.visit(t.body);if(p instanceof C)break;if(p instanceof M){u();continue}if(p instanceof y)return this.popScope(),p;n==null||n.push(p),u()}return this.popScope(),n!=null?n:null}visitForOfStatement(t){let n=this.visit(t.collection);if(!Array.isArray(n))throw Error("Can iterate non array object");let r=t.retain?[]:void 0;this.pushScope("ForOfStatement");for(let s of n){this._declareForIdentifier(t.identifier,s);let o=this.visit(t.body);if(o instanceof C)break;if(!(o instanceof M)){if(o instanceof y)return this.popScope(),o;r==null||r.push(o)}}return this.popScope(),r!=null?r:null}visitContinueAST(t){return new M}visitReturnAST(t){return new y(t.value!=null?this.visit(t.value):null)}_declareForIdentifier(t,n){if(t instanceof I){if(!Array.isArray(n))throw Error("Unable to make a tuple from non Array element");this.changeVariable(t.first.value,n[0]),this.changeVariable(t.second.value,n[1])}this.changeVariable(t.value,n)}resolveArguments(t){return t.map(n=>this.visit(n))}setFunctionResolver(t){this._functionResolver=t}resolveFunction(t){var n,r;return(r=this._functionsRegistry[t])!=null?r:(n=this._functionResolver)==null?void 0:n.call(this,t)}resolveFunctionSpec(t){return this._functionSpecs[t]}capabilities(){return xt(this._functionSpecs)}registerFunction(t,n,r){this._functionsRegistry[t]=n,this._functionSpecs[t]=g(t,r)}unregisterFunction(t){delete this._functionsRegistry[t],delete this._functionSpecs[t]}validate(t,n,r=!1){let s=[],o=this.validationFunctionSpecs(n);try{this.validateNode(d.compile(t,r),o,s)}catch(u){s.push({code:"syntax_error",message:u instanceof Error?u.message:String(u)})}return{ok:s.length===0,errors:s}}validateManifest(t,n,r=!1){let s=[],o=this.validationFunctionSpecs(n.functions);try{let u=d.compile(t,r);this.validateNode(u,o,s),this.validateManifestNode(u,n,s)}catch(u){s.push({code:"syntax_error",message:u instanceof Error?u.message:String(u)})}return{ok:s.length===0,errors:s}}validationFunctionSpecs(t){let n=new Map;return Object.keys(rt).forEach(r=>{var s;return n.set(r,(s=this._functionSpecs[r])!=null?s:rt[r])}),t==null?(Object.keys(this._functionSpecs).forEach(r=>n.set(r,this._functionSpecs[r])),n):t instanceof Set?(t.forEach(r=>{var s;return n.set(r,(s=this._functionSpecs[r])!=null?s:g(r))}),n):Array.isArray(t)?(t.forEach(r=>{var s;typeof r=="string"?n.set(r,(s=this._functionSpecs[r])!=null?s:g(r)):n.set(r.name,g(r.name,r))}),n):(Object.keys(t).forEach(r=>n.set(r,g(r,t[r]))),n)}validateNode(t,n,r,s=!1){t&&(t instanceof j||t instanceof R?t.body.forEach(o=>this.validateNode(o,n,r,s)):t instanceof L?(this.validateNode(t.identifier,n,r,s),this.validateNode(t.init,n,r,s)):t instanceof X?this.validateNode(t.expression,n,r,s):t instanceof P?this.validateCallExpression(t,n,r,s):t instanceof z?(this.validateNode(t.left,n,r,s),this.validateNode(t.right,n,r,s)):t instanceof U?this.validateNode(t.argument,n,r,s):t instanceof W?(this.validateNode(t.test,n,r,s),this.validateNode(t.consequent,n,r,s),this.validateNode(t.alternate,n,r,s)):t instanceof B?(this.validateNode(t.left,n,r,s),this.validateNode(t.right,n,r,s)):t instanceof w?(this.validateNode(t.owner,n,r,s),this.validateNode(t.key,n,r,s)):t instanceof $?t.properties.forEach(o=>this.validateNode(o,n,r,s)):t instanceof O?(this.validateNode(t.key,n,r,s),this.validateNode(t.value,n,r,s)):t instanceof F?t.elements.forEach(o=>this.validateNode(o,n,r,s)):t instanceof D?(this.validateNode(t.test,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof K?(this.validateNode(t.init,n,r,s),this.validateNode(t.test,n,r,s),this.validateNode(t.update,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof H?(this.validateNode(t.identifier,n,r,s),this.validateNode(t.collection,n,r,s),this.validateNode(t.body,n,r,s)):t instanceof I?(this.validateNode(t.first,n,r,s),this.validateNode(t.second,n,r,s)):t instanceof Y&&this.validateNode(t.value,n,r,s))}validateCallExpression(t,n,r,s){let o=t.callee.value;if(o==="_try_"){t.arguments.length!==1&&r.push(this.validationError("invalid_try_arity",t,"_try_ expects exactly one expression","_try_",{argCount:t.arguments.length,minArgs:1,maxArgs:1})),t.arguments.forEach(u=>this.validateNode(u,n,r,!0));return}if(!s){let u=n.get(o);u?pt(u,t.arguments.length)?this.validateStaticArgumentTypes(t,u,r):r.push(this.validationError("invalid_function_arity",t,`Function '${o}' expects ${ft(u)} argument(s), got ${t.arguments.length}`,o,{argCount:t.arguments.length,minArgs:Q(u),maxArgs:u.maxArgs})):this._options.compatV1||r.push(this.validationError("unknown_function",t,`Unknown function '${o}'`,o))}t.arguments.forEach(u=>this.validateNode(u,n,r,s))}validateStaticArgumentTypes(t,n,r){var s;(s=n.args)==null||s.forEach((o,u)=>{var m,_;let p=t.arguments[u];if(!p)return;let f=this.staticArgumentType(p);!f||this.argumentTypeMatches(o,f)||r.push(this.validationError("invalid_argument_type",t,`Function '${n.name}' argument ${u} expects ${(m=o.type)!=null?m:"any"}, got ${f}`,n.name,{argIndex:u,expectedType:(_=o.type)!=null?_:"any",actualType:f}))})}staticArgumentType(t){if(t instanceof x)return Z(t.value);if(t instanceof F)return"array";if(t instanceof $)return"object"}argumentTypeMatches(t,n){var s;let r=(s=t.type)!=null?s:"any";return r==="any"||t.required===!1&&n==="null"?!0:r===n}validateManifestNode(t,n,r){var p,f;let s=((p=n.inputs)!=null?p:[]).map(bt),o=((f=n.outputs)!=null?f:[]).map(bt),u={knownInputs:new Set(s.map(m=>m.name)),assigned:new Set,assignedTypes:new Map,reportedInputs:new Set};this.analyzeManifestNode(t,u,r),o.forEach(m=>{var b,yt,At;if(((b=m.required)==null||b)&&!u.assigned.has(m.name)){r.push(this.validationError("missing_output",t,`Required output '${m.name}' is not assigned`,m.name));return}let _=u.assignedTypes.get(m.name);!_||this.valueSpecTypeMatches(m,_)||r.push(this.validationError("invalid_output_type",t,`Output '${m.name}' expects ${(yt=m.type)!=null?yt:"any"}, got ${_}`,m.name,{expectedType:(At=m.type)!=null?At:"any",actualType:_}))})}analyzeManifestNode(t,n,r){t&&(t instanceof j||t instanceof R?t.body.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof L?(this.analyzeManifestNode(t.init,n,r),t.identifier instanceof w&&this.analyzeManifestNode(t.identifier,n,r),this.markAssignedTarget(t.identifier,this.staticArgumentType(t.init),n)):t instanceof X?this.analyzeManifestNode(t.expression,n,r):t instanceof P?t.arguments.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof z?(this.analyzeManifestNode(t.left,n,r),this.analyzeManifestNode(t.right,n,r)):t instanceof U?this.analyzeManifestNode(t.argument,n,r):t instanceof W?(this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.consequent,n,r),this.analyzeManifestNode(t.alternate,n,r)):t instanceof B?(this.analyzeManifestNode(t.left,n,r),this.analyzeManifestNode(t.right,n,r)):t instanceof w?(this.analyzeManifestNode(t.owner,n,r),this.analyzeManifestNode(t.key,n,r)):t instanceof $?t.properties.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof O?(this.analyzeManifestNode(t.key,n,r),this.analyzeManifestNode(t.value,n,r)):t instanceof F?t.elements.forEach(s=>this.analyzeManifestNode(s,n,r)):t instanceof D?(this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.body,n,r)):t instanceof K?(this.analyzeManifestNode(t.init,n,r),this.analyzeManifestNode(t.test,n,r),this.analyzeManifestNode(t.body,n,r),this.analyzeManifestNode(t.update,n,r)):t instanceof H?(this.analyzeManifestNode(t.collection,n,r),this.markAssignedTarget(t.identifier,void 0,n),this.analyzeManifestNode(t.body,n,r)):t instanceof I?(this.analyzeManifestNode(t.first,n,r),this.analyzeManifestNode(t.second,n,r)):t instanceof Y?this.analyzeManifestNode(t.value,n,r):t instanceof E&&!n.knownInputs.has(t.value)&&!n.assigned.has(t.value)&&!n.reportedInputs.has(t.value)&&(n.reportedInputs.add(t.value),r.push(this.validationError("unknown_input",t,`Unknown input '${t.value}'`,t.value))))}markAssignedTarget(t,n,r){t instanceof E?(r.assigned.add(t.value),n&&r.assignedTypes.set(t.value,n)):t instanceof I&&(this.markAssignedTarget(t.first,void 0,r),this.markAssignedTarget(t.second,void 0,r))}valueSpecTypeMatches(t,n){var s;let r=(s=t.type)!=null?s:"any";return r==="any"||t.required===!1&&n==="null"?!0:r===n}validationError(t,n,r,s,o){return{code:t,message:r,name:s,line:n.line,col:n.col,node:n.constructor.name,argCount:o==null?void 0:o.argCount,minArgs:o==null?void 0:o.minArgs,maxArgs:o==null?void 0:o.maxArgs,argIndex:o==null?void 0:o.argIndex,expectedType:o==null?void 0:o.expectedType,actualType:o==null?void 0:o.actualType}}validateRuntimeArgumentTypes(t,n,r){var s;(s=n.args)==null||s.forEach((o,u)=>{var f,m;if(u>=r.length)return;let p=Z(r[u]);if(!this.argumentTypeMatches(o,p))throw new S(`Function '${n.name}' argument ${u} expects ${(f=o.type)!=null?f:"any"}, got ${p}`,t.line,t.col,t.constructor.name,void 0,{code:"invalid_argument_type",name:n.name,argIndex:u,expectedType:(m=o.type)!=null?m:"any",actualType:p})})}execute(t,n=!0,r){let s=d.compile(t,n);return r&&Object.keys(r).forEach(o=>this.changeVariable(o,r[o])),this.resetExecutionBudget(),this.clearTrace(),this.visit(s)}static compile(t,n=!1){let r=Tt(t);if(n&&this._cache.has(r))return this._cache.get(r);let s=new ht(t),u=new vt(s).parse();return n&&this._cache.set(r,u),u}static register(t,n,r){d._globalFunctionsRegistry[t]=n,d._globalFunctionSpecs[t]=g(t,r)}static unregister(t){delete d._globalFunctionsRegistry[t],delete d._globalFunctionSpecs[t]}static capabilities(){return xt({...rt,...d._globalFunctionSpecs})}static validateSource(t,n,r=!1){return new d().validate(t,n,r)}static validateManifestSource(t,n,r=!1){return new d().validateManifest(t,n,r)}static run(t,n=!1,r,s){return new d(s).execute(t,n,r)}static newInstance(t){return new d(t)}clone(){var t=new d(this.options);return t._functionsRegistry={...this._functionsRegistry},t._functionSpecs={...this._functionSpecs},t.rootScope.memory={...this.rootScope.memory},t}newAsyncInstance(){let t=dt.newInstance(this.options);return t.rootScope.memory=this.rootScope.memory,t._functionsRegistry=this._functionsRegistry,t._functionSpecs=this._functionSpecs,t}};d._globalFunctionsRegistry={},d._globalFunctionSpecs={},d._cache=new Map;var ut=d,dt=class a extends ut{constructor(e){super(e)}async visitRootAST(e){var r;let t=e.body,n;for(let s of t)if(n=await this.visit(s),n instanceof y)return(r=n.value)!=null?r:null;return n!=null?n:null}async visitBlockStatementAST(e){let t=e.body,n;this.pushScope("Block");for(let r of t)if(n=await this.visit(r),n instanceof V||n instanceof y)break;return this.popScope(),n}async visitIdentifierAST(e){let t=e.value;return this.resolve(t)}async visitLiteralAST(e){return e.value}async visitAssignmentExpressionAST(e){let t=e.identifier,n=e.init,r=null;if(t instanceof w){var s=await this.visit(t.owner);r=await this.visit(e.init);var o=await this.visit(t.key);this.assignProperty(s,o,r)}else t instanceof E&&(r=await this.visit(n),this.changeVariable(t.value,r));return r}async visitExpressionStatementAST(e){let t=e.expression;return await this.visit(t)}async visitCallExpressionAST(e){var f,m;let t=e.callee,n=e.arguments,r=t.value;if(r==="_try_"){if(n.length!==1)throw new S("_try_ expects exactly one expression",e.line,e.col,e.constructor.name,void 0,{code:"invalid_try_arity",name:"_try_",argCount:n.length,minArgs:1,maxArgs:1});try{let _=await this.visit(n[0]);return _ instanceof V||_ instanceof y?_:this.successResult(_)}catch(_){if(_ instanceof S)return this.errorResult(_);throw _}}let s=this.resolveFunction(r);if(!s){if(this._options.compatV1)return null;throw new S(`Unknown function '${r}'`,e.line,e.col,e.constructor.name,void 0,{code:"unknown_function",name:r})}let o=this.resolveFunctionSpec(r);if(o&&!pt(o,n.length))throw new S(`Function '${r}' expects ${ft(o)} argument(s), got ${n.length}`,e.line,e.col,e.constructor.name,void 0,{code:"invalid_function_arity",name:r,argCount:n.length,minArgs:Q(o),maxArgs:o.maxArgs});let u=await Promise.all(n.map(_=>this.visit(_)));o&&this.validateRuntimeArgumentTypes(e,o,u),this.recordTrace("call",e,r,{argCount:u.length,returnType:(f=o==null?void 0:o.returnType)!=null?f:"any"});let p=await s(u,this);return this.recordTrace("call_result",e,r,{returnType:(m=o==null?void 0:o.returnType)!=null?m:"any",actualType:Z(p)}),p}async visitBinaryExpressionAST(e){let t=e.left,n=e.right,r=e.operation,s=await this.visit(t),o=await this.visit(n);switch(r.type){case i.plus:return h(s)&&h(o)?s+o:`${s}${o}`;case i.minus:if(h(s)&&h(o))return s-o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.mult:if(h(s)&&h(o))return s*o;if(q(s)&&h(o))return s.repeat(o);if(h(s)&&q(o))return o.repeat(s);throw new Error(`Operation ${r.value} not allowed no num value`);case i.div:if(h(s)&&h(o)){if(o===0)throw new Error("Invalid division by 0");return s/o}throw new Error(`Operation ${r.value} not allowed no num value`);case i.mod:if(h(s)&&h(o))return s%o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.great:if(h(s)&&h(o))return s>o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.greatEq:if(h(s)&&h(o))return s>=o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.less:if(h(s)&&h(o))return s<o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.lessEq:if(h(s)&&h(o))return s<=o;throw new Error(`Operation ${r.value} not allowed no num value`);case i.eqeq:return s===o;case i.notEq:return s!==o;default:throw new Error(`Operation ${r.value} not allowed no num value`)}}async visitUnaryExpressionAST(e){let t=e.argument,n=e.operation,r=await this.visit(t);if(n.type===i.not)return A(r)===!1;if(!h(r))throw new Error(`Operation ${n.value} not allowed no num value`);if(n.type===i.plus)return r;if(n.type===i.minus)return-r;throw new Error(`Operation ${n.value} not allowed no num value`)}async visitIfStatementAST(e){let t=e.test,n=await this.visit(t);return A(n)?await this.visit(e.consequent):e.alternate?await this.visit(e.alternate):null}async visitLogicalExpressionAST(e){let t=e.left,n=await this.visit(t);if(e.operator.type===i.nullity)return n!=null?n:await this.visit(e.right);let r=A(n);return e.operator.type===i.and?r?A(await this.visit(e.right)):!1:e.operator.type===i.or?r?!0:A(await this.visit(e.right)):!1}async visitIndexAccessorAST(e){var r,s;let t=e.owner,n=await this.visit(t);if(n==null)return null;if(Array.isArray(n)){let o=await this.visit(e.key);return h(o)&&Number.isInteger(o)&&n.length>o&&o>=0&&(r=n[o])!=null?r:null}else if(typeof n=="object"){let o=await this.visit(e.key);return(s=n[o])!=null?s:null}return null}async visitObjectProperty(e){}async visitObjectExpression(e){let t={},n=e;for(let r of n.properties)if(r instanceof O){let s=await this.visit(r.key);s=q(s)?s:s.toString(),t[s]=await this.visit(r.value)}return t}async visitArrayExpression(e){let t=e;return await this.resolveArgumentsAsync(t.elements)}async visitWhileLoopStatement(e){this.log(`WhileLoopStatement ${e.test} ${e.body}`);let t=e.retain?[]:void 0;for(;A(await this.visit(e.test));){let n=await this.visit(e.body);if(n instanceof C)break;if(!(n instanceof M)){if(n instanceof y)return this.popScope(),n;t==null||t.push(n)}}return t}async visitForLoopStatement(e){let t=e.retain?[]:void 0,n=e.init.identifier;if(!(n instanceof E))throw new Error("Unexpected identifer found");this.pushScope("ForLoopStatement");let r=await this.visit(e.init.init);this.changeVariable(n.value,r);let s=async()=>{let u=await this.visit(e.test);if(h(u)){let p=this.resolve(n.value);return e.direction.type===i.up?u>=p:u<=p}return A(u)},o=async()=>{let u=await this.visit(e.update);if(h(u)){let p=this.resolve(n.value);if(!h(p))throw Error("Cant update value");this.changeVariable(n.value,e.direction.type===i.up?p+u:p-u)}else throw Error("Update value cant be non number")};for(;await s();){let u=await this.visit(e.body);if(u instanceof C)break;if(u instanceof M){await o();continue}if(u instanceof y)return this.popScope(),u;t==null||t.push(u),await o()}return this.popScope(),t!=null?t:null}async visitForOfStatement(e){let t=await this.visit(e.collection);if(!Array.isArray(t))throw Error("Can iterate non array object");let n=e.retain?[]:void 0;this.pushScope("ForOfStatement");for(let r of t){this._declareForIdentifier(e.identifier,r);let s=await this.visit(e.body);if(s instanceof C)break;if(!(s instanceof M)){if(s instanceof y)return this.popScope(),s;n==null||n.push(s)}}return this.popScope(),n}async visitReturnAST(e){return new y(e.value!=null?await this.visit(e.value):null)}async resolveArgumentsAsync(e){return await Promise.all(e.map(async t=>await this.visit(t)))}registerFunction(e,t,n){this._functionsRegistry[e]=t,this._functionSpecs[e]=g(e,n)}unregisterFunction(e){delete this._functionsRegistry[e],delete this._functionSpecs[e]}async execute(e,t=!0,n){let r=ut.compile(e,t);return n&&Object.keys(n).forEach(s=>this.changeVariable(s,n[s])),this.resetExecutionBudget(),this.clearTrace(),await this.visit(r)}static async run(e,t=!1,n,r){return await new a(r).execute(e,t,n)}static newInstance(e){return new a(e)}clone(){var e=new a(this.options);return e._functionsRegistry={...this._functionsRegistry},e._functionSpecs={...this._functionSpecs},e.rootScope.memory={...this.rootScope.memory},e}};export{v as AST,F as ArrayExpression,L as AssignmentExpressionAST,z as BinaryExpressionAST,R as BlockStatementAST,et as BreakAST,C as BreakBranch,P as CallExpressionAST,nt as ContinueAST,M as ContinueBranch,X as ExpressionStatementAST,K as ForLoopStatement,H as ForOfStatement,E as IdentifierAST,W as IfStatementAST,w as IndexAccessorAST,J as LexerDictionary,x as LiteralAST,B as LogicalExpressionAST,V as LoopControl,ot as MEventScope,ut as MEvento,dt as MEventoAsync,S as MEventoRuntimeError,_t as NodeVisitor,$ as ObjectExpression,O as ObjectProperty,Y as ReturnAST,y as ReturnBranch,j as RootAST,l as Token,i as TokenType,I as TupleExpression,U as UnaryExpressionAST,D as WhileLoopStatement};

package/package.json

@@ -1,26 +1,25 @@
 {
     "name": "mevento",
-    "version": "3.0.3",
-    "main": "dist/cjs/index.js",  
-    "module": "dist/esm/index.mjs", 
+    "version": "4.0.0",
+    "main": "dist/cjs/index.js",
+    "module": "dist/esm/index.mjs",
     "types": "dist/esm/index.d.mts",
     "scripts": {
-      "build": "tsup"
+        "build": "tsup",
+        "test:conformance": "npm run build && node test/conformance.mjs"
     },
     "files": [
-      "/dist"
+        "/dist"
     ],
-    "dependencies": {
-      "tslib": "^2.0.3"
-    },
+    "dependencies": {},
     "exports": {
-      ".": {
-        "require": "./dist/cjs/index.js",  
-        "import": "./dist/esm/index.mjs"  
-      }
+        ".": {
+            "require": "./dist/cjs/index.js",
+            "import": "./dist/esm/index.mjs"
+        }
     },
     "devDependencies": {
-      "tsup": "^8.3.0",
-      "typescript": "^5.6.2"
+        "tsup": "^8.3.0",
+        "typescript": "^5.6.2"
     }
-  }
+}