swf-toolkit 0.0.0-stage → 0.1.0

package/dist/cjs/compiler/codegen.js

@@ -0,0 +1,1589 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.FunctionCompiler = exports.TOPLEVEL_NAMES = void 0;
+const abc_file_js_1 = require("../abc/abc-file.js");
+const analysis_js_1 = require("../abc/analysis.js");
+const code_js_1 = require("../abc/code.js");
+const constants_js_1 = require("../abc/constants.js");
+const opcodes_js_1 = require("../abc/opcodes.js");
+const lexer_js_1 = require("./lexer.js");
+/** Names of top-level (public, unnamed package) classes and functions of the Flash runtime. */
+exports.TOPLEVEL_NAMES = new Set([
+    'Object', 'Class', 'Function', 'Namespace', 'QName', 'Boolean', 'Number', 'int', 'uint', 'String', 'Array', 'Vector',
+    'Error', 'DefinitionError', 'EvalError', 'RangeError', 'ReferenceError', 'SecurityError', 'SyntaxError', 'TypeError',
+    'URIError', 'VerifyError', 'ArgumentError', 'UninitializedError', 'Date', 'Math', 'RegExp', 'XML', 'XMLList', 'JSON',
+    'void', 'trace', 'isNaN', 'isFinite', 'parseInt', 'parseFloat', 'escape', 'unescape', 'encodeURI', 'decodeURI',
+    'encodeURIComponent', 'decodeURIComponent', 'isXMLName', 'NaN', 'Infinity', 'undefined',
+]);
+const isIntLiteral = (v) => Number.isInteger(v) && v >= -0x80000000 && v <= 0x7fffffff && !Object.is(v, -0);
+/** Compiles one function (method, accessor, constructor or closure). */
+class FunctionCompiler {
+    scope;
+    fn;
+    options;
+    items = [];
+    nextLabelId = 0;
+    exceptions = [];
+    locals = new Map();
+    nextReg;
+    freeTemps = [];
+    loops = [];
+    activationReg = -1;
+    activationTraits = [];
+    needsActivation;
+    /** Pending label for the next loop/switch statement. */
+    pendingLabel;
+    scopeDepth = 0;
+    method;
+    constructor(scope, fn, options) {
+        this.scope = scope;
+        this.fn = fn;
+        this.options = options;
+        const { pool } = scope;
+        this.method = {
+            paramTypes: fn.params.map((p) => (p.type ? scope.resolveType(p.type) : 0)),
+            returnType: fn.returnType ? scope.resolveType(fn.returnType) : 0,
+            name: pool.string(options.name ?? fn.name ?? ''),
+            flags: 0,
+            optional: [],
+            paramNames: fn.params.map((p) => pool.string(p.name)),
+        };
+        const firstOpt = fn.params.findIndex((p) => p.init);
+        if (firstOpt >= 0) {
+            for (const p of fn.params.slice(firstOpt)) {
+                if (!p.init)
+                    throw this.err('Required parameter after optional parameter', fn.pos);
+                this.method.optional.push(this.constantValue(p.init));
+            }
+        }
+        if (fn.rest)
+            this.method.flags |= constants_js_1.MethodFlags.NEED_REST;
+        this.needsActivation = containsFunction(fn.body ?? []);
+        if (this.needsActivation)
+            this.method.flags |= constants_js_1.MethodFlags.NEED_ACTIVATION;
+        if (!fn.rest && usesArguments(fn.body ?? []))
+            this.method.flags |= constants_js_1.MethodFlags.NEED_ARGUMENTS;
+        // Registers: 0 = this, 1..n = params, then rest/arguments.
+        fn.params.forEach((p, i) => this.declare(p.name, i + 1, this.method.paramTypes[i]));
+        this.nextReg = fn.params.length + 1;
+        if (fn.rest)
+            this.declare(fn.rest.name, this.nextReg++, 0);
+        else if (this.method.flags & constants_js_1.MethodFlags.NEED_ARGUMENTS)
+            this.declare('arguments', this.nextReg++, 0);
+    }
+    err(msg, pos) {
+        return new lexer_js_1.CompileError(msg, pos?.line ?? 0, pos?.col ?? 0, this.scope.source);
+    }
+    // -------------------------------------------------------------------------
+    // Emission helpers
+    // -------------------------------------------------------------------------
+    newLabel() {
+        return this.nextLabelId++;
+    }
+    place(label) {
+        this.items.push({ type: 'label', id: label });
+        // Branch targets in AVM2 code must not be skipped by the verifier's
+        // backward-branch rule; a `label` op is only needed for backward targets.
+    }
+    emit(op, ...args) {
+        this.items.push({ type: 'op', op, args, targets: [], offset: -1 });
+        if (op === opcodes_js_1.Op.pushscope || op === opcodes_js_1.Op.pushwith)
+            this.scopeDepth++;
+        if (op === opcodes_js_1.Op.popscope)
+            this.scopeDepth--;
+    }
+    jump(op, label) {
+        this.items.push({ type: 'op', op, args: [], targets: [label], offset: -1 });
+    }
+    temp() {
+        return this.freeTemps.pop() ?? this.nextReg++;
+    }
+    release(reg) {
+        this.emit(opcodes_js_1.Op.kill, reg);
+        this.freeTemps.push(reg);
+    }
+    getReg(r) {
+        if (r <= 3)
+            this.emit(opcodes_js_1.Op.getlocal0 + r);
+        else
+            this.emit(opcodes_js_1.Op.getlocal, r);
+    }
+    setReg(r) {
+        if (r <= 3)
+            this.emit(opcodes_js_1.Op.setlocal0 + r);
+        else
+            this.emit(opcodes_js_1.Op.setlocal, r);
+    }
+    declare(name, reg, type) {
+        const v = { name, reg, slot: 0, type };
+        this.locals.set(name, v);
+        return v;
+    }
+    // -------------------------------------------------------------------------
+    // Constant pool helpers
+    // -------------------------------------------------------------------------
+    get pool() {
+        return this.scope.pool;
+    }
+    /** Runtime-resolved name: Multiname(name, open namespaces). */
+    mn(name) {
+        return this.pool.multiname({ kind: constants_js_1.MultinameKind.Multiname, name: this.pool.string(name), nsSet: this.scope.openNsSet });
+    }
+    /** Attribute multiname (`@name`). */
+    mnAttr(name) {
+        return this.pool.multiname({ kind: constants_js_1.MultinameKind.MultinameA, name: this.pool.string(name === '*' ? null : name), nsSet: this.scope.openNsSet });
+    }
+    /** Late-bound multiname for `obj[expr]`. */
+    mnLate(attr = false) {
+        return this.pool.multiname({ kind: attr ? constants_js_1.MultinameKind.MultinameLA : constants_js_1.MultinameKind.MultinameL, nsSet: this.scope.openNsSet });
+    }
+    /** Name with an explicit namespace (`ns::name`). */
+    mnQualified(ns, name, pos) {
+        if (ns === '*')
+            return this.pool.multiname({ kind: constants_js_1.MultinameKind.QName, ns: 0, name: this.pool.string(name) });
+        const nsIndex = this.scope.namespaceByName(ns);
+        if (nsIndex === undefined)
+            throw this.err(`Unknown namespace '${ns}'`, pos);
+        return this.pool.multiname({ kind: constants_js_1.MultinameKind.QName, ns: nsIndex, name: this.pool.string(name) });
+    }
+    publicQName(name) {
+        return this.pool.qname(this.pool.namespace(constants_js_1.NamespaceKind.PackageNamespace, ''), name);
+    }
+    /** Default value for optional parameters / slots. */
+    constantValue(e) {
+        const abc = this.scope.abc;
+        switch (e.k) {
+            case 'num':
+                if (isIntLiteral(e.v))
+                    return { kind: constants_js_1.ConstantKind.Int, value: abc.int(e.v) };
+                return { kind: constants_js_1.ConstantKind.Double, value: abc.double(e.v) };
+            case 'str':
+                return { kind: constants_js_1.ConstantKind.Utf8, value: this.pool.string(e.v) };
+            case 'bool':
+                return e.v ? { kind: constants_js_1.ConstantKind.True, value: constants_js_1.ConstantKind.True } : { kind: constants_js_1.ConstantKind.False, value: constants_js_1.ConstantKind.False };
+            case 'null':
+                return { kind: constants_js_1.ConstantKind.Null, value: constants_js_1.ConstantKind.Null };
+            case 'undefined':
+                return { kind: constants_js_1.ConstantKind.Undefined, value: 0 };
+            case 'id':
+                if (e.name === 'NaN')
+                    return { kind: constants_js_1.ConstantKind.Double, value: abc.double(NaN) };
+                if (e.name === 'Infinity')
+                    return { kind: constants_js_1.ConstantKind.Double, value: abc.double(Infinity) };
+                break;
+            case 'unary':
+                if (e.op === '-' && e.e.k === 'id' && e.e.name === 'Infinity')
+                    return { kind: constants_js_1.ConstantKind.Double, value: abc.double(-Infinity) };
+                break;
+        }
+        throw this.err('Default value must be a compile-time constant', e.pos);
+    }
+    // -------------------------------------------------------------------------
+    // Function compilation
+    // -------------------------------------------------------------------------
+    /** Compiles the function and installs it in the ABC. Returns the method index. */
+    compile() {
+        const { abc } = this.scope;
+        const fn = this.fn;
+        // Hoist `var` declarations and nested function declarations.
+        const hoisted = [];
+        collectVars(fn.body ?? [], hoisted);
+        for (const d of hoisted) {
+            if (!this.locals.has(d.name))
+                this.declare(d.name, this.nextReg++, d.type ? this.scope.resolveType(d.type) : 0);
+        }
+        // Move locals into the activation object when closures may capture them.
+        if (this.needsActivation) {
+            let slot = 1;
+            for (const v of this.locals.values()) {
+                v.slot = slot++;
+                this.activationTraits.push((0, abc_file_js_1.newTrait)({ kind: constants_js_1.TraitKind.Slot, name: this.publicQName(v.name), id: v.slot, typeName: v.type }));
+            }
+            this.activationReg = this.nextReg++;
+        }
+        this.emit(opcodes_js_1.Op.getlocal0);
+        this.emit(opcodes_js_1.Op.pushscope);
+        if (this.needsActivation) {
+            this.emit(opcodes_js_1.Op.newactivation);
+            this.emit(opcodes_js_1.Op.dup);
+            this.setReg(this.activationReg);
+            this.emit(opcodes_js_1.Op.pushscope);
+            // Copy parameters (still in registers) into their slots.
+            for (const v of this.locals.values()) {
+                if (v.reg > 0 && v.reg <= fn.params.length + (fn.rest || this.method.flags & constants_js_1.MethodFlags.NEED_ARGUMENTS ? 1 : 0)) {
+                    this.getReg(this.activationReg);
+                    this.getReg(v.reg);
+                    this.emit(opcodes_js_1.Op.setslot, v.slot);
+                }
+            }
+            for (const v of this.locals.values())
+                v.reg = -1;
+        }
+        // Typed locals start with their type's default value (ASC does the same for int/uint/Number/Boolean),
+        // unless the declaration initialises them before any possible use.
+        const skipDefault = new Set();
+        const seen = new Set();
+        for (const st of fn.body ?? []) {
+            if (st.k === 'var') {
+                for (const d of st.decls) {
+                    if (d.init)
+                        walkAllExprs([{ k: 'expr', e: d.init, pos: d.pos }], (x) => void (x.k === 'id' && seen.add(x.name)));
+                    if (d.init && !seen.has(d.name))
+                        skipDefault.add(d.name);
+                    seen.add(d.name);
+                }
+                continue;
+            }
+            walkAllExprs([st], (x) => void (x.k === 'id' && seen.add(x.name)));
+            if (st.k !== 'expr')
+                break;
+        }
+        for (const d of hoisted) {
+            const v = this.locals.get(d.name);
+            const def = this.defaultFor(v.type);
+            if (def !== undefined && !this.needsActivation && !skipDefault.has(d.name)) {
+                def();
+                this.setReg(v.reg);
+            }
+        }
+        // Nested function declarations are initialised up front.
+        for (const s of fn.body ?? []) {
+            if (s.k === 'function') {
+                this.compileClosure(s.fn);
+                this.storeLocal(this.locals.get(s.fn.name));
+            }
+        }
+        this.options.prologue?.(this);
+        const body = fn.body ?? [];
+        if (this.options.isConstructor && !hasSuperCall(body)) {
+            this.emit(opcodes_js_1.Op.getlocal0);
+            this.emit(opcodes_js_1.Op.constructsuper, 0);
+        }
+        for (const s of body)
+            this.stmt(s);
+        this.emit(opcodes_js_1.Op.returnvoid);
+        // Encode and install.
+        const issues = (0, analysis_js_1.verifyCode)(abc, this.items, this.exceptions);
+        if (issues.length) {
+            throw this.err(`Internal compiler error in ${this.options.name ?? fn.name ?? 'function'}: ${issues.map((i) => i.message).join('; ')}`, fn.pos);
+        }
+        const encoded = (0, code_js_1.encodeCode)(this.items, this.exceptions);
+        const limits = (0, analysis_js_1.computeLimits)(abc, this.items, this.exceptions);
+        const index = this.options.methodIndex ?? abc.methods.length;
+        if (this.options.methodIndex === undefined)
+            abc.methods.push(this.method);
+        else
+            abc.methods[index] = this.method;
+        const mb = {
+            method: index,
+            maxStack: Math.max(1, limits.maxStack),
+            localCount: Math.max(limits.registers, (0, analysis_js_1.minLocalCount)(this.method), this.nextReg),
+            initScopeDepth: this.options.initScopeDepth,
+            maxScopeDepth: this.options.initScopeDepth + Math.max(1, limits.maxScope),
+            code: encoded.code,
+            exceptions: encoded.exceptions,
+            traits: this.activationTraits,
+        };
+        const existing = abc.bodies.findIndex((b) => b.method === index);
+        if (existing >= 0)
+            abc.bodies[existing] = mb;
+        else
+            abc.bodies.push(mb);
+        return index;
+    }
+    /** Pushes the default value of a typed local, or returns undefined if none is needed. */
+    defaultFor(type) {
+        if (type === 0)
+            return undefined;
+        const name = this.scope.abc.qualifiedName(type);
+        switch (name) {
+            case 'int':
+            case 'uint':
+                return () => this.emit(opcodes_js_1.Op.pushbyte, 0);
+            case 'Number':
+                return () => this.emit(opcodes_js_1.Op.pushnan);
+            case 'Boolean':
+                return () => this.emit(opcodes_js_1.Op.pushfalse);
+            default:
+                return undefined;
+        }
+    }
+    compileClosure(def) {
+        const inner = new FunctionCompiler(this.scope, def, {
+            initScopeDepth: this.options.initScopeDepth + this.scopeDepth,
+            name: def.name ?? '',
+        });
+        const idx = inner.compile();
+        this.emit(opcodes_js_1.Op.newfunction, idx);
+    }
+    // -------------------------------------------------------------------------
+    // Variables
+    // -------------------------------------------------------------------------
+    lookupLocal(name) {
+        return this.locals.get(name);
+    }
+    loadLocal(v) {
+        if (v.reg >= 0)
+            this.getReg(v.reg);
+        else {
+            this.getReg(this.activationReg);
+            this.emit(opcodes_js_1.Op.getslot, v.slot);
+        }
+    }
+    /** Stores the value on top of the stack into a local (consumes it). */
+    storeLocal(v) {
+        if (v.type)
+            this.coerceTo(v.type);
+        if (v.reg >= 0)
+            this.setReg(v.reg);
+        else {
+            this.getReg(this.activationReg);
+            this.emit(opcodes_js_1.Op.swap);
+            this.emit(opcodes_js_1.Op.setslot, v.slot);
+        }
+    }
+    /** Emits the coercion ASC would insert when storing into a typed location. */
+    coerceTo(type) {
+        const name = this.scope.abc.qualifiedName(type);
+        switch (name) {
+            case '*':
+                return;
+            case 'int':
+                this.emit(opcodes_js_1.Op.convert_i);
+                return;
+            case 'uint':
+                this.emit(opcodes_js_1.Op.convert_u);
+                return;
+            case 'Number':
+                this.emit(opcodes_js_1.Op.convert_d);
+                return;
+            case 'Boolean':
+                this.emit(opcodes_js_1.Op.convert_b);
+                return;
+            case 'String':
+                this.emit(opcodes_js_1.Op.coerce_s);
+                return;
+            case 'Object':
+                return;
+            default:
+                this.emit(opcodes_js_1.Op.coerce, type);
+        }
+    }
+    // -------------------------------------------------------------------------
+    // Statements
+    // -------------------------------------------------------------------------
+    stmts(list) {
+        for (const s of list)
+            this.stmt(s);
+    }
+    stmt(s) {
+        switch (s.k) {
+            case 'empty':
+            case 'function': // hoisted
+                return;
+            case 'expr':
+                this.exprDiscard(s.e);
+                return;
+            case 'var':
+                for (const d of s.decls) {
+                    if (!d.init)
+                        continue;
+                    this.expr(d.init);
+                    this.storeLocal(this.lookupLocal(d.name));
+                }
+                return;
+            case 'block':
+                this.stmts(s.body);
+                return;
+            case 'if': {
+                const elseL = this.newLabel();
+                this.condJump(s.c, false, elseL);
+                this.stmt(s.then);
+                if (s.else) {
+                    const endL = this.newLabel();
+                    this.jump(opcodes_js_1.Op.jump, endL);
+                    this.place(elseL);
+                    this.stmt(s.else);
+                    this.place(endL);
+                }
+                else
+                    this.place(elseL);
+                return;
+            }
+            case 'while': {
+                const condL = this.newLabel();
+                const bodyL = this.newLabel();
+                const endL = this.newLabel();
+                this.jump(opcodes_js_1.Op.jump, condL);
+                this.place(bodyL);
+                this.emit(opcodes_js_1.Op.label);
+                this.loop(endL, condL, () => this.stmt(s.body));
+                this.place(condL);
+                this.condJump(s.c, true, bodyL);
+                this.place(endL);
+                return;
+            }
+            case 'dowhile': {
+                const bodyL = this.newLabel();
+                const condL = this.newLabel();
+                const endL = this.newLabel();
+                this.place(bodyL);
+                this.emit(opcodes_js_1.Op.label);
+                this.loop(endL, condL, () => this.stmt(s.body));
+                this.place(condL);
+                this.condJump(s.c, true, bodyL);
+                this.place(endL);
+                return;
+            }
+            case 'for': {
+                if (s.init)
+                    this.stmt(s.init);
+                const condL = this.newLabel();
+                const bodyL = this.newLabel();
+                const contL = this.newLabel();
+                const endL = this.newLabel();
+                this.jump(opcodes_js_1.Op.jump, condL);
+                this.place(bodyL);
+                this.emit(opcodes_js_1.Op.label);
+                this.loop(endL, contL, () => this.stmt(s.body));
+                this.place(contL);
+                if (s.update)
+                    this.exprDiscard(s.update);
+                this.place(condL);
+                if (s.c)
+                    this.condJump(s.c, true, bodyL);
+                else
+                    this.jump(opcodes_js_1.Op.jump, bodyL);
+                this.place(endL);
+                return;
+            }
+            case 'forin':
+                this.forIn(s);
+                return;
+            case 'switch':
+                this.switchStmt(s);
+                return;
+            case 'try':
+                this.tryStmt(s);
+                return;
+            case 'return':
+                if (s.e) {
+                    this.expr(s.e);
+                    if (this.method.returnType)
+                        this.coerceTo(this.method.returnType);
+                    if (this.finallyStack.length) {
+                        const t = this.temp();
+                        this.setReg(t);
+                        this.runFinallies(0);
+                        this.getReg(t);
+                        this.release(t);
+                    }
+                    this.emit(opcodes_js_1.Op.returnvalue);
+                }
+                else {
+                    this.runFinallies(0);
+                    this.emit(opcodes_js_1.Op.returnvoid);
+                }
+                return;
+            case 'throw':
+                this.expr(s.e);
+                this.emit(opcodes_js_1.Op.throw);
+                return;
+            case 'break':
+            case 'continue': {
+                for (let i = this.loops.length - 1; i >= 0; i--) {
+                    const l = this.loops[i];
+                    if (s.label !== undefined) {
+                        if (l.label !== s.label)
+                            continue;
+                    }
+                    else if (l.kind === 'block' || (s.k === 'continue' && l.kind !== 'loop'))
+                        continue;
+                    if (s.k === 'continue' && l.kind !== 'loop')
+                        throw this.err(`Cannot continue label '${s.label}'`, s.pos);
+                    this.runFinallies(i + 1);
+                    // Leave with / catch scopes opened inside the target loop.
+                    for (const sc of this.extraScopes)
+                        if (sc.depth > i)
+                            this.items.push({ type: 'op', op: opcodes_js_1.Op.popscope, args: [], targets: [], offset: -1 });
+                    this.jump(opcodes_js_1.Op.jump, s.k === 'break' ? l.breakLabel : l.continueLabel);
+                    return;
+                }
+                throw this.err(`'${s.k}' outside of a loop${s.label ? ` (label ${s.label})` : ''}`, s.pos);
+            }
+            case 'labeled': {
+                const inner = s.body;
+                if (inner.k === 'while' || inner.k === 'dowhile' || inner.k === 'for' || inner.k === 'forin' || inner.k === 'switch') {
+                    this.pendingLabel = s.label;
+                    this.stmt(inner);
+                }
+                else {
+                    const endL = this.newLabel();
+                    this.loops.push({ kind: 'block', label: s.label, breakLabel: endL, continueLabel: -1 });
+                    this.stmt(inner);
+                    this.loops.pop();
+                    this.place(endL);
+                }
+                return;
+            }
+            case 'with': {
+                this.expr(s.obj);
+                this.emit(opcodes_js_1.Op.dup);
+                const t = this.temp();
+                this.setReg(t);
+                this.emit(opcodes_js_1.Op.pushwith);
+                this.extraScopes.push({ depth: this.loops.length, reg: t, isWith: true });
+                this.stmt(s.body);
+                this.extraScopes.pop();
+                this.emit(opcodes_js_1.Op.popscope);
+                this.release(t);
+                return;
+            }
+            case 'dxns':
+                this.expr(s.e);
+                this.emit(opcodes_js_1.Op.dxnslate);
+                return;
+        }
+    }
+    loop(breakLabel, continueLabel, body) {
+        const label = this.pendingLabel;
+        this.pendingLabel = undefined;
+        this.loops.push({ kind: 'loop', label, breakLabel, continueLabel });
+        body();
+        this.loops.pop();
+    }
+    forIn(s) {
+        const objReg = this.temp();
+        const idxReg = this.temp();
+        this.expr(s.obj);
+        this.emit(opcodes_js_1.Op.coerce_a);
+        this.setReg(objReg);
+        this.emit(opcodes_js_1.Op.pushbyte, 0);
+        this.setReg(idxReg);
+        const condL = this.newLabel();
+        const bodyL = this.newLabel();
+        const endL = this.newLabel();
+        this.jump(opcodes_js_1.Op.jump, condL);
+        this.place(bodyL);
+        this.emit(opcodes_js_1.Op.label);
+        this.getReg(objReg);
+        this.getReg(idxReg);
+        this.emit(s.each ? opcodes_js_1.Op.nextvalue : opcodes_js_1.Op.nextname);
+        if (s.decl)
+            this.storeLocal(this.lookupLocal(s.decl.name));
+        else
+            this.storeTo(s.target);
+        this.loop(endL, condL, () => this.stmt(s.body));
+        this.place(condL);
+        this.emit(opcodes_js_1.Op.hasnext2, objReg, idxReg);
+        this.jump(opcodes_js_1.Op.iftrue, bodyL);
+        this.place(endL);
+        this.release(idxReg);
+        this.release(objReg);
+    }
+    /** Compiles `switch` the way ASC does: case bodies first, then a dispatcher feeding lookupswitch. */
+    switchStmt(s) {
+        // Switching on a register local needs no temporary.
+        const localDisc = s.disc.k === 'id' && !s.disc.ns ? this.lookupLocal(s.disc.name) : undefined;
+        const ownTemp = !(localDisc && localDisc.reg >= 0);
+        const disc = ownTemp ? this.temp() : localDisc.reg;
+        if (ownTemp) {
+            this.expr(s.disc);
+            this.setReg(disc);
+        }
+        const endL = this.newLabel();
+        const dispatchL = this.newLabel();
+        const caseLabels = s.cases.map(() => this.newLabel());
+        this.jump(opcodes_js_1.Op.jump, dispatchL);
+        const label = this.pendingLabel;
+        this.pendingLabel = undefined;
+        this.loops.push({ kind: 'switch', label, breakLabel: endL, continueLabel: -1 });
+        s.cases.forEach((c, i) => {
+            this.place(caseLabels[i]);
+            this.emit(opcodes_js_1.Op.label);
+            this.stmts(c.body);
+        });
+        this.loops.pop();
+        this.jump(opcodes_js_1.Op.jump, endL);
+        // Dispatcher: compute the case index, then lookupswitch.
+        this.place(dispatchL);
+        const tested = s.cases.map((c, i) => ({ c, i })).filter((x) => x.c.test !== null);
+        const defaultIdx = s.cases.findIndex((c) => c.test === null);
+        const switchL = this.newLabel();
+        tested.forEach(({ c }, k) => {
+            const next = this.newLabel();
+            this.expr(c.test);
+            this.getReg(disc);
+            this.jump(opcodes_js_1.Op.ifstrictne, next);
+            this.pushNumber(k);
+            this.jump(opcodes_js_1.Op.jump, switchL);
+            this.place(next);
+        });
+        this.pushNumber(tested.length);
+        this.place(switchL);
+        if (ownTemp)
+            this.release(disc);
+        const defaultTarget = defaultIdx >= 0 ? caseLabels[defaultIdx] : endL;
+        const targets = [defaultTarget, ...tested.map(({ i }) => caseLabels[i]), defaultTarget];
+        this.items.push({ type: 'op', op: opcodes_js_1.Op.lookupswitch, args: [], targets, offset: -1 });
+        this.place(endL);
+    }
+    finallyStack = [];
+    /** Extra scopes (with / catch) currently open: loop depth when pushed and the register holding the object. */
+    extraScopes = [];
+    /** Re-establishes the scope stack at an exception handler (the VM clears it). */
+    restoreScopes() {
+        this.emit(opcodes_js_1.Op.getlocal0);
+        this.emit(opcodes_js_1.Op.pushscope);
+        if (this.activationReg >= 0) {
+            this.getReg(this.activationReg);
+            this.emit(opcodes_js_1.Op.pushscope);
+        }
+        for (const sc of this.extraScopes) {
+            this.getReg(sc.reg);
+            this.emit(sc.isWith ? opcodes_js_1.Op.pushwith : opcodes_js_1.Op.pushscope);
+        }
+    }
+    tryStmt(s) {
+        const fromL = this.newLabel();
+        const toL = this.newLabel();
+        const afterL = this.newLabel();
+        const depthBefore = this.scopeDepth;
+        if (s.finally)
+            this.finallyStack.push({ body: s.finally, loopDepth: this.loops.length });
+        this.place(fromL);
+        this.stmts(s.body);
+        this.place(toL);
+        if (s.finally)
+            this.stmts(s.finally);
+        this.jump(opcodes_js_1.Op.jump, afterL);
+        const catchEndL = this.newLabel();
+        for (const c of s.catches) {
+            const handlerL = this.newLabel();
+            const excType = c.type ? this.scope.resolveType(c.type) : 0;
+            this.exceptions.push({ from: fromL, to: toL, target: handlerL, excType, varName: this.publicQName(c.name) });
+            const excIndex = this.exceptions.length - 1;
+            this.place(handlerL);
+            this.scopeDepth = 0;
+            this.restoreScopes();
+            // ASC-style catch scope: the variable lives in a scope object so closures can see it.
+            const saved = this.locals.get(c.name);
+            this.locals.delete(c.name);
+            const scopeReg = this.temp();
+            this.emit(opcodes_js_1.Op.newcatch, excIndex);
+            this.emit(opcodes_js_1.Op.dup);
+            this.setReg(scopeReg);
+            this.emit(opcodes_js_1.Op.dup);
+            this.emit(opcodes_js_1.Op.pushscope);
+            this.emit(opcodes_js_1.Op.swap);
+            this.emit(opcodes_js_1.Op.setslot, 1);
+            this.extraScopes.push({ depth: this.loops.length, reg: scopeReg, isWith: false });
+            this.stmts(c.body);
+            this.extraScopes.pop();
+            this.emit(opcodes_js_1.Op.popscope);
+            if (saved)
+                this.locals.set(c.name, saved);
+            this.release(scopeReg);
+            if (s.finally)
+                this.stmts(s.finally);
+            this.jump(opcodes_js_1.Op.jump, afterL);
+        }
+        this.place(catchEndL);
+        if (s.finally) {
+            this.finallyStack.pop();
+            // Catch-all: run the finally block and rethrow.
+            const handlerL = this.newLabel();
+            this.exceptions.push({ from: fromL, to: catchEndL, target: handlerL, excType: 0, varName: 0 });
+            this.place(handlerL);
+            this.scopeDepth = 0;
+            this.restoreScopes();
+            const t = this.temp();
+            this.setReg(t);
+            this.stmts(s.finally);
+            this.getReg(t);
+            this.release(t);
+            this.emit(opcodes_js_1.Op.throw);
+        }
+        this.scopeDepth = depthBefore;
+        this.place(afterL);
+    }
+    /** Inlines pending finally blocks when control leaves them via return/break/continue. */
+    runFinallies(downToLoopDepth) {
+        for (let i = this.finallyStack.length - 1; i >= 0; i--) {
+            const f = this.finallyStack[i];
+            if (f.loopDepth < downToLoopDepth)
+                break;
+            // Run the block without it being active (a return inside finally must not recurse).
+            this.finallyStack.splice(i, 1);
+            this.stmts(f.body);
+            this.finallyStack.splice(i, 0, f);
+        }
+    }
+    // -------------------------------------------------------------------------
+    // Expressions
+    // -------------------------------------------------------------------------
+    pushNumber(v) {
+        if (Number.isNaN(v))
+            this.emit(opcodes_js_1.Op.pushnan);
+        else if (isIntLiteral(v) && v >= -128 && v <= 127)
+            this.emit(opcodes_js_1.Op.pushbyte, v);
+        else if (isIntLiteral(v) && v >= -32768 && v <= 32767)
+            this.emit(opcodes_js_1.Op.pushshort, v);
+        else if (isIntLiteral(v))
+            this.emit(opcodes_js_1.Op.pushint, this.scope.abc.int(v));
+        else if (Number.isInteger(v) && v >= 0 && v <= 0xffffffff)
+            this.emit(opcodes_js_1.Op.pushuint, this.scope.abc.uint(v));
+        else
+            this.emit(opcodes_js_1.Op.pushdouble, this.scope.abc.double(v));
+    }
+    /** Multiname for a property access expression (member / index / descendants). */
+    propertyName(e) {
+        if (e.k === 'member') {
+            if (e.ns)
+                return { mn: this.mnQualified(e.ns, e.name, e.pos), late: false };
+            return { mn: e.attr ? this.mnAttr(e.name) : this.mn(e.name), late: false };
+        }
+        if (e.k === 'index')
+            return { mn: this.mnLate(e.attr), late: true };
+        throw this.err('Not a property reference', e.pos);
+    }
+    /** Name used to look up a bare identifier. */
+    identName(e) {
+        if (e.ns)
+            return this.mnQualified(e.ns, e.name, e.pos);
+        return this.scope.resolveName(e.name) ?? this.mn(e.name);
+    }
+    expr(e) {
+        switch (e.k) {
+            case 'num':
+                this.pushNumber(e.v);
+                return;
+            case 'str':
+                this.emit(opcodes_js_1.Op.pushstring, this.pool.string(e.v));
+                return;
+            case 'bool':
+                this.emit(e.v ? opcodes_js_1.Op.pushtrue : opcodes_js_1.Op.pushfalse);
+                return;
+            case 'null':
+                this.emit(opcodes_js_1.Op.pushnull);
+                return;
+            case 'undefined':
+                this.emit(opcodes_js_1.Op.pushundefined);
+                return;
+            case 'regex':
+                this.emit(opcodes_js_1.Op.getlex, this.publicQName('RegExp'));
+                this.emit(opcodes_js_1.Op.pushstring, this.pool.string(e.pattern));
+                this.emit(opcodes_js_1.Op.pushstring, this.pool.string(e.flags));
+                this.emit(opcodes_js_1.Op.construct, 2);
+                return;
+            case 'xml':
+                this.emit(opcodes_js_1.Op.getlex, this.publicQName(e.text.startsWith('<>') ? 'XMLList' : 'XML'));
+                this.emit(opcodes_js_1.Op.pushstring, this.pool.string(e.text.startsWith('<>') ? e.text.slice(2, -3) : e.text));
+                this.emit(opcodes_js_1.Op.construct, 1);
+                return;
+            case 'this':
+                this.emit(opcodes_js_1.Op.getlocal0);
+                return;
+            case 'super':
+                this.emit(opcodes_js_1.Op.getlocal0);
+                return;
+            case 'id': {
+                const local = e.ns ? undefined : this.lookupLocal(e.name);
+                if (local)
+                    return this.loadLocal(local);
+                if (!e.ns && e.name === 'NaN')
+                    return this.emit(opcodes_js_1.Op.pushnan);
+                if (!e.ns && e.name === 'Infinity')
+                    return this.emit(opcodes_js_1.Op.pushdouble, this.scope.abc.double(Infinity));
+                const mn = this.identName(e);
+                if (e.ns) {
+                    this.emit(opcodes_js_1.Op.findpropstrict, mn);
+                    this.emit(opcodes_js_1.Op.getproperty, mn);
+                }
+                else
+                    this.emit(opcodes_js_1.Op.getlex, mn);
+                return;
+            }
+            case 'member':
+            case 'index': {
+                if (e.obj.k === 'super') {
+                    this.emit(opcodes_js_1.Op.getlocal0);
+                    if (e.k === 'index')
+                        this.expr(e.index);
+                    this.emit(opcodes_js_1.Op.getsuper, this.propertyName(e).mn);
+                    return;
+                }
+                this.expr(e.obj);
+                if (e.k === 'index')
+                    this.expr(e.index);
+                this.emit(opcodes_js_1.Op.getproperty, this.propertyName(e).mn);
+                return;
+            }
+            case 'descendants':
+                this.expr(e.obj);
+                this.emit(opcodes_js_1.Op.getdescendants, e.attr ? this.mnAttr(e.name) : this.mn(e.name));
+                return;
+            case 'filter':
+                this.filter(e);
+                return;
+            case 'typeapply':
+                this.expr(e.base);
+                for (const p of e.params)
+                    this.typeValue(p);
+                this.emit(opcodes_js_1.Op.applytype, e.params.length);
+                return;
+            case 'call':
+                this.call(e, true);
+                return;
+            case 'new':
+                this.newExpr(e);
+                return;
+            case 'vector': {
+                this.emit(opcodes_js_1.Op.getlex, this.pool.qname(this.pool.namespace(constants_js_1.NamespaceKind.PackageNamespace, '__AS3__.vec'), 'Vector'));
+                this.typeValue(e.type);
+                this.emit(opcodes_js_1.Op.applytype, 1);
+                this.pushNumber(e.items.length);
+                this.emit(opcodes_js_1.Op.construct, 1);
+                e.items.forEach((item, i) => {
+                    this.emit(opcodes_js_1.Op.dup);
+                    this.pushNumber(i);
+                    this.expr(item);
+                    this.emit(opcodes_js_1.Op.setproperty, this.mnLate());
+                });
+                return;
+            }
+            case 'unary':
+                this.unary(e);
+                return;
+            case 'update':
+                this.update(e, true);
+                return;
+            case 'binary':
+                this.binary(e);
+                return;
+            case 'cond': {
+                const elseL = this.newLabel();
+                const endL = this.newLabel();
+                this.condJump(e.c, false, elseL);
+                this.expr(e.t);
+                this.emit(opcodes_js_1.Op.coerce_a);
+                this.jump(opcodes_js_1.Op.jump, endL);
+                this.place(elseL);
+                this.expr(e.f);
+                this.emit(opcodes_js_1.Op.coerce_a);
+                this.place(endL);
+                return;
+            }
+            case 'assign':
+                this.assign(e, true);
+                return;
+            case 'array':
+                for (const it of e.items) {
+                    if (it)
+                        this.expr(it);
+                    else
+                        this.emit(opcodes_js_1.Op.pushundefined);
+                }
+                this.emit(opcodes_js_1.Op.newarray, e.items.length);
+                return;
+            case 'object':
+                for (const p of e.props) {
+                    this.emit(opcodes_js_1.Op.pushstring, this.pool.string(String(p.key)));
+                    this.expr(p.value);
+                }
+                this.emit(opcodes_js_1.Op.newobject, e.props.length);
+                return;
+            case 'function':
+                this.compileClosure(e.fn);
+                return;
+            case 'comma':
+                e.list.forEach((x, i) => (i < e.list.length - 1 ? this.exprDiscard(x) : this.expr(x)));
+                return;
+        }
+    }
+    /** Pushes a type as a value (for `as`, `is`, `Vector.<T>`). */
+    typeValue(t) {
+        if (t.name === '*') {
+            this.emit(opcodes_js_1.Op.pushnull);
+            return;
+        }
+        if (t.params) {
+            this.typeValue({ name: t.name, pos: t.pos });
+            for (const p of t.params)
+                this.typeValue(p);
+            this.emit(opcodes_js_1.Op.applytype, t.params.length);
+            return;
+        }
+        this.emit(opcodes_js_1.Op.getlex, this.scope.resolveType(t));
+    }
+    /** Evaluates `e` for its side effects only. */
+    exprDiscard(e) {
+        switch (e.k) {
+            case 'assign':
+                this.assign(e, false);
+                return;
+            case 'update':
+                this.update(e, false);
+                return;
+            case 'call':
+                this.call(e, false);
+                return;
+            case 'comma':
+                for (const x of e.list)
+                    this.exprDiscard(x);
+                return;
+            default:
+                this.expr(e);
+                this.emit(opcodes_js_1.Op.pop);
+        }
+    }
+    args(list) {
+        for (const a of list)
+            this.expr(a);
+    }
+    call(e, wantValue) {
+        const fn = e.fn;
+        const n = e.args.length;
+        if (fn.k === 'super') {
+            this.emit(opcodes_js_1.Op.getlocal0);
+            this.args(e.args);
+            this.emit(opcodes_js_1.Op.constructsuper, n);
+            if (wantValue)
+                this.emit(opcodes_js_1.Op.pushundefined);
+            return;
+        }
+        if ((fn.k === 'member' || fn.k === 'index') && fn.obj.k === 'super') {
+            this.emit(opcodes_js_1.Op.getlocal0);
+            if (fn.k === 'index')
+                this.expr(fn.index);
+            this.args(e.args);
+            this.emit(wantValue ? opcodes_js_1.Op.callsuper : opcodes_js_1.Op.callsupervoid, this.propertyName(fn).mn, n);
+            return;
+        }
+        if (fn.k === 'member' || fn.k === 'index') {
+            this.expr(fn.obj);
+            if (fn.k === 'index')
+                this.expr(fn.index);
+            this.args(e.args);
+            this.emit(wantValue ? opcodes_js_1.Op.callproperty : opcodes_js_1.Op.callpropvoid, this.propertyName(fn).mn, n);
+            return;
+        }
+        if (fn.k === 'id' && !(this.lookupLocal(fn.name) && !fn.ns)) {
+            const mn = this.identName(fn);
+            this.emit(opcodes_js_1.Op.findpropstrict, mn);
+            this.args(e.args);
+            this.emit(wantValue ? opcodes_js_1.Op.callproperty : opcodes_js_1.Op.callpropvoid, mn, n);
+            return;
+        }
+        this.expr(fn);
+        this.emit(opcodes_js_1.Op.pushnull);
+        this.args(e.args);
+        this.emit(opcodes_js_1.Op.call, n);
+        if (!wantValue)
+            this.emit(opcodes_js_1.Op.pop);
+    }
+    newExpr(e) {
+        const c = e.ctor;
+        const n = e.args.length;
+        if (c.k === 'id' && (c.ns || !this.lookupLocal(c.name))) {
+            const mn = this.identName(c);
+            this.emit(opcodes_js_1.Op.findpropstrict, mn);
+            this.args(e.args);
+            this.emit(opcodes_js_1.Op.constructprop, mn, n);
+            return;
+        }
+        if (c.k === 'member' && c.obj.k !== 'super') {
+            this.expr(c.obj);
+            this.args(e.args);
+            this.emit(opcodes_js_1.Op.constructprop, this.propertyName(c).mn, n);
+            return;
+        }
+        this.expr(c);
+        this.args(e.args);
+        this.emit(opcodes_js_1.Op.construct, n);
+    }
+    unary(e) {
+        switch (e.op) {
+            case '!':
+                this.expr(e.e);
+                this.emit(opcodes_js_1.Op.not);
+                return;
+            case '-':
+                this.expr(e.e);
+                this.emit(opcodes_js_1.Op.negate);
+                return;
+            case '+':
+                this.expr(e.e);
+                this.emit(opcodes_js_1.Op.convert_d);
+                return;
+            case '~':
+                this.expr(e.e);
+                this.emit(opcodes_js_1.Op.bitnot);
+                return;
+            case 'typeof':
+                if (e.e.k === 'id' && !e.e.ns && !this.lookupLocal(e.e.name)) {
+                    // typeof on an undeclared name must not throw.
+                    const mn = this.identName(e.e);
+                    this.emit(opcodes_js_1.Op.findproperty, mn);
+                    this.emit(opcodes_js_1.Op.getproperty, mn);
+                }
+                else
+                    this.expr(e.e);
+                this.emit(opcodes_js_1.Op.typeof);
+                return;
+            case 'void':
+                this.exprDiscard(e.e);
+                this.emit(opcodes_js_1.Op.pushundefined);
+                return;
+            case 'delete': {
+                const t = e.e;
+                if (t.k === 'member' || t.k === 'index') {
+                    this.expr(t.obj);
+                    if (t.k === 'index')
+                        this.expr(t.index);
+                    this.emit(opcodes_js_1.Op.deleteproperty, this.propertyName(t).mn);
+                }
+                else if (t.k === 'id' && !this.lookupLocal(t.name)) {
+                    const mn = this.identName(t);
+                    this.emit(opcodes_js_1.Op.findproperty, mn);
+                    this.emit(opcodes_js_1.Op.deleteproperty, mn);
+                }
+                else {
+                    this.exprDiscard(t);
+                    this.emit(opcodes_js_1.Op.pushtrue);
+                }
+                return;
+            }
+        }
+        throw this.err(`Unsupported unary operator '${e.op}'`, e.pos);
+    }
+    /**
+     * Generic read-modify-write on an lvalue. `compute` receives the old value on
+     * the stack and must leave the new value. When `wantValue`, `resultOld`
+     * selects whether the old (postfix) or new value is left on the stack.
+     */
+    modify(target, compute, wantValue, resultOld) {
+        // Locals.
+        if (target.k === 'id' && !target.ns && this.lookupLocal(target.name)) {
+            const v = this.lookupLocal(target.name);
+            this.loadLocal(v);
+            if (resultOld) {
+                this.emit(opcodes_js_1.Op.convert_d);
+                if (wantValue)
+                    this.emit(opcodes_js_1.Op.dup);
+                compute();
+            }
+            else {
+                compute();
+                if (wantValue)
+                    this.emit(opcodes_js_1.Op.dup);
+            }
+            this.storeLocal(v);
+            return;
+        }
+        // Property targets: obj [, index] evaluated once.
+        let mn;
+        let isSuper = false;
+        let idxReg = -1;
+        if (target.k === 'id') {
+            mn = this.identName(target);
+            this.emit(opcodes_js_1.Op.findpropstrict, mn);
+        }
+        else if (target.k === 'member' || target.k === 'index') {
+            isSuper = target.obj.k === 'super';
+            // Re-evaluating trivial operands is cheaper (and decompiles better) than temporaries.
+            const trivial = (x) => x.k === 'num' || x.k === 'str' || x.k === 'bool' || x.k === 'null' || x.k === 'this' || (x.k === 'id' && !x.ns);
+            if (!isSuper && target.k === 'index' && trivial(target.obj) && trivial(target.index)) {
+                const mnL = this.propertyName(target).mn;
+                this.expr(target.obj);
+                this.expr(target.index);
+                this.expr(target.obj);
+                this.expr(target.index);
+                this.emit(opcodes_js_1.Op.getproperty, mnL);
+                let res = -1;
+                const save = () => {
+                    if (!wantValue)
+                        return;
+                    this.emit(opcodes_js_1.Op.dup);
+                    res = this.temp();
+                    this.setReg(res);
+                };
+                if (resultOld) {
+                    this.emit(opcodes_js_1.Op.convert_d);
+                    save();
+                    compute();
+                }
+                else {
+                    compute();
+                    save();
+                }
+                this.emit(opcodes_js_1.Op.setproperty, mnL);
+                if (res >= 0) {
+                    this.getReg(res);
+                    this.release(res);
+                }
+                return;
+            }
+            if (isSuper)
+                this.emit(opcodes_js_1.Op.getlocal0);
+            else
+                this.expr(target.obj);
+            mn = this.propertyName(target).mn;
+            if (target.k === 'index') {
+                this.expr(target.index);
+                idxReg = this.temp();
+                this.setReg(idxReg);
+            }
+        }
+        else
+            throw this.err('Invalid assignment target', target.pos);
+        // Stack: obj → obj, obj [, idx] → obj, old
+        this.emit(opcodes_js_1.Op.dup);
+        if (idxReg >= 0)
+            this.getReg(idxReg);
+        this.emit(isSuper ? opcodes_js_1.Op.getsuper : opcodes_js_1.Op.getproperty, mn);
+        let resultReg = -1;
+        const saveResult = () => {
+            if (!wantValue)
+                return;
+            this.emit(opcodes_js_1.Op.dup);
+            resultReg = this.temp();
+            this.setReg(resultReg);
+        };
+        if (resultOld) {
+            this.emit(opcodes_js_1.Op.convert_d);
+            saveResult();
+            compute();
+        }
+        else {
+            compute();
+            saveResult();
+        }
+        // Stack: obj, new → obj [, idx], new
+        if (idxReg >= 0) {
+            const valReg = this.temp();
+            this.setReg(valReg);
+            this.getReg(idxReg);
+            this.getReg(valReg);
+            this.release(valReg);
+        }
+        this.emit(isSuper ? opcodes_js_1.Op.setsuper : opcodes_js_1.Op.setproperty, mn);
+        if (idxReg >= 0)
+            this.release(idxReg);
+        if (resultReg >= 0) {
+            this.getReg(resultReg);
+            this.release(resultReg);
+        }
+    }
+    update(e, wantValue) {
+        // Fast path: int local, statement position.
+        if (!wantValue && e.e.k === 'id' && !e.e.ns) {
+            const v = this.lookupLocal(e.e.name);
+            if (v && v.reg >= 0) {
+                const tn = this.scope.abc.qualifiedName(v.type);
+                if (tn === 'int')
+                    this.emit(e.op === '++' ? opcodes_js_1.Op.inclocal_i : opcodes_js_1.Op.declocal_i, v.reg);
+                else
+                    this.emit(e.op === '++' ? opcodes_js_1.Op.inclocal : opcodes_js_1.Op.declocal, v.reg);
+                return;
+            }
+        }
+        this.modify(e.e, () => this.emit(e.op === '++' ? opcodes_js_1.Op.increment : opcodes_js_1.Op.decrement), wantValue, !e.prefix);
+    }
+    /** Stores the value on top of the stack into an lvalue (consumes it). */
+    storeTo(target) {
+        if (target.k === 'id' && !target.ns) {
+            const v = this.lookupLocal(target.name);
+            if (v)
+                return this.storeLocal(v);
+        }
+        const t = this.temp();
+        this.setReg(t);
+        if (target.k === 'id') {
+            const mn = this.identName(target);
+            this.emit(opcodes_js_1.Op.findproperty, mn);
+            this.getReg(t);
+            this.emit(opcodes_js_1.Op.setproperty, mn);
+        }
+        else if (target.k === 'member' || target.k === 'index') {
+            const isSuper = target.obj.k === 'super';
+            if (isSuper)
+                this.emit(opcodes_js_1.Op.getlocal0);
+            else
+                this.expr(target.obj);
+            if (target.k === 'index')
+                this.expr(target.index);
+            this.getReg(t);
+            this.emit(isSuper ? opcodes_js_1.Op.setsuper : opcodes_js_1.Op.setproperty, this.propertyName(target).mn);
+        }
+        else
+            throw this.err('Invalid assignment target', target.pos);
+        this.release(t);
+    }
+    assign(e, wantValue) {
+        if (e.op) {
+            if (e.op === '&&' || e.op === '||') {
+                const op = e.op;
+                this.modify(e.target, () => {
+                    const endL = this.newLabel();
+                    this.emit(opcodes_js_1.Op.dup);
+                    this.jump(op === '&&' ? opcodes_js_1.Op.iffalse : opcodes_js_1.Op.iftrue, endL);
+                    this.emit(opcodes_js_1.Op.pop);
+                    this.expr(e.v);
+                    this.place(endL);
+                }, wantValue, false);
+                return;
+            }
+            this.modify(e.target, () => {
+                this.expr(e.v);
+                this.emit(binaryOp(e.op));
+            }, wantValue, false);
+            return;
+        }
+        const target = e.target;
+        // Simple, common forms first.
+        if (target.k === 'id' && !target.ns) {
+            const v = this.lookupLocal(target.name);
+            if (v) {
+                this.expr(e.v);
+                if (wantValue)
+                    this.emit(opcodes_js_1.Op.dup);
+                this.storeLocal(v);
+                return;
+            }
+            const mn = this.identName(target);
+            this.emit(opcodes_js_1.Op.findproperty, mn);
+            this.expr(e.v);
+            const t = wantValue ? this.temp() : -1;
+            if (wantValue) {
+                this.emit(opcodes_js_1.Op.dup);
+                this.setReg(t);
+            }
+            this.emit(this.options.constTargets?.has(target.name) ? opcodes_js_1.Op.initproperty : opcodes_js_1.Op.setproperty, mn);
+            if (wantValue) {
+                this.getReg(t);
+                this.release(t);
+            }
+            return;
+        }
+        if (target.k === 'member' || target.k === 'index') {
+            const isSuper = target.obj.k === 'super';
+            if (isSuper)
+                this.emit(opcodes_js_1.Op.getlocal0);
+            else
+                this.expr(target.obj);
+            if (target.k === 'index')
+                this.expr(target.index);
+            this.expr(e.v);
+            const t = wantValue ? this.temp() : -1;
+            if (wantValue) {
+                this.emit(opcodes_js_1.Op.dup);
+                this.setReg(t);
+            }
+            const isInit = !isSuper && target.k === 'member' && !target.ns && target.obj.k === 'this' && this.options.constTargets?.has(target.name);
+            this.emit(isSuper ? opcodes_js_1.Op.setsuper : isInit ? opcodes_js_1.Op.initproperty : opcodes_js_1.Op.setproperty, this.propertyName(target).mn);
+            if (wantValue) {
+                this.getReg(t);
+                this.release(t);
+            }
+            return;
+        }
+        throw this.err('Invalid assignment target', target.pos);
+    }
+    binary(e) {
+        if (e.op === '&&' || e.op === '||') {
+            const endL = this.newLabel();
+            this.expr(e.a);
+            this.emit(opcodes_js_1.Op.coerce_a);
+            this.emit(opcodes_js_1.Op.dup);
+            this.jump(e.op === '&&' ? opcodes_js_1.Op.iffalse : opcodes_js_1.Op.iftrue, endL);
+            this.emit(opcodes_js_1.Op.pop);
+            this.expr(e.b);
+            this.emit(opcodes_js_1.Op.coerce_a);
+            this.place(endL);
+            return;
+        }
+        if (e.op === 'as' || e.op === 'is') {
+            this.expr(e.a);
+            if (e.b.k === 'id' && e.b.name === '*') {
+                if (e.op === 'is') {
+                    this.emit(opcodes_js_1.Op.pop);
+                    this.emit(opcodes_js_1.Op.pushtrue);
+                }
+                return;
+            }
+            this.expr(e.b);
+            this.emit(e.op === 'as' ? opcodes_js_1.Op.astypelate : opcodes_js_1.Op.istypelate);
+            return;
+        }
+        if (e.op === '!=' || e.op === '!==') {
+            this.expr(e.a);
+            this.expr(e.b);
+            this.emit(e.op === '!=' ? opcodes_js_1.Op.equals : opcodes_js_1.Op.strictequals);
+            this.emit(opcodes_js_1.Op.not);
+            return;
+        }
+        this.expr(e.a);
+        this.expr(e.b);
+        this.emit(binaryOp(e.op));
+    }
+    /** Jumps to `label` when `e` is truthy (`onTrue`) or falsy. */
+    condJump(e, onTrue, label) {
+        if (e.k === 'unary' && e.op === '!')
+            return this.condJump(e.e, !onTrue, label);
+        if (e.k === 'binary' && (e.op === '&&' || e.op === '||')) {
+            const isAnd = e.op === '&&';
+            if (isAnd !== onTrue) {
+                // (a && b) false → a false or b false;  (a || b) true → a true or b true
+                this.condJump(e.a, onTrue, label);
+                this.condJump(e.b, onTrue, label);
+            }
+            else {
+                const skip = this.newLabel();
+                this.condJump(e.a, !onTrue, skip);
+                this.condJump(e.b, onTrue, label);
+                this.place(skip);
+            }
+            return;
+        }
+        if (e.k === 'binary') {
+            const cmp = {
+                '==': [opcodes_js_1.Op.ifeq, opcodes_js_1.Op.ifne],
+                '!=': [opcodes_js_1.Op.ifne, opcodes_js_1.Op.ifeq],
+                '===': [opcodes_js_1.Op.ifstricteq, opcodes_js_1.Op.ifstrictne],
+                '!==': [opcodes_js_1.Op.ifstrictne, opcodes_js_1.Op.ifstricteq],
+                '<': [opcodes_js_1.Op.iflt, opcodes_js_1.Op.ifnlt],
+                '<=': [opcodes_js_1.Op.ifle, opcodes_js_1.Op.ifnle],
+                '>': [opcodes_js_1.Op.ifgt, opcodes_js_1.Op.ifngt],
+                '>=': [opcodes_js_1.Op.ifge, opcodes_js_1.Op.ifnge],
+            };
+            const pair = cmp[e.op];
+            if (pair) {
+                this.expr(e.a);
+                this.expr(e.b);
+                this.jump(onTrue ? pair[0] : pair[1], label);
+                return;
+            }
+        }
+        if (e.k === 'bool') {
+            if (e.v === onTrue)
+                this.jump(opcodes_js_1.Op.jump, label);
+            return;
+        }
+        this.expr(e);
+        this.jump(onTrue ? opcodes_js_1.Op.iftrue : opcodes_js_1.Op.iffalse, label);
+    }
+    /** E4X filter: `xml.(cond)`. */
+    filter(e) {
+        const listReg = this.temp();
+        const idxReg = this.temp();
+        const resReg = this.temp();
+        this.expr(e.obj);
+        this.emit(opcodes_js_1.Op.checkfilter);
+        this.setReg(listReg);
+        this.emit(opcodes_js_1.Op.pushbyte, 0);
+        this.setReg(idxReg);
+        this.emit(opcodes_js_1.Op.getlex, this.publicQName('XMLList'));
+        this.emit(opcodes_js_1.Op.pushstring, this.pool.string(''));
+        this.emit(opcodes_js_1.Op.construct, 1);
+        this.setReg(resReg);
+        const condL = this.newLabel();
+        const bodyL = this.newLabel();
+        const skipL = this.newLabel();
+        this.jump(opcodes_js_1.Op.jump, condL);
+        this.place(bodyL);
+        this.emit(opcodes_js_1.Op.label);
+        this.getReg(listReg);
+        this.getReg(idxReg);
+        this.emit(opcodes_js_1.Op.nextvalue);
+        this.emit(opcodes_js_1.Op.dup);
+        const itemReg = this.temp();
+        this.setReg(itemReg);
+        this.emit(opcodes_js_1.Op.pushwith);
+        this.condJump(e.cond, false, skipL);
+        this.getReg(resReg);
+        this.getReg(idxReg);
+        this.getReg(itemReg);
+        this.emit(opcodes_js_1.Op.setproperty, this.mnLate());
+        this.place(skipL);
+        this.emit(opcodes_js_1.Op.popscope);
+        this.place(condL);
+        this.emit(opcodes_js_1.Op.hasnext2, listReg, idxReg);
+        this.jump(opcodes_js_1.Op.iftrue, bodyL);
+        this.getReg(resReg);
+        for (const r of [itemReg, resReg, idxReg, listReg])
+            this.release(r);
+    }
+}
+exports.FunctionCompiler = FunctionCompiler;
+function binaryOp(op) {
+    const map = {
+        '+': opcodes_js_1.Op.add,
+        '-': opcodes_js_1.Op.subtract,
+        '*': opcodes_js_1.Op.multiply,
+        '/': opcodes_js_1.Op.divide,
+        '%': opcodes_js_1.Op.modulo,
+        '<<': opcodes_js_1.Op.lshift,
+        '>>': opcodes_js_1.Op.rshift,
+        '>>>': opcodes_js_1.Op.urshift,
+        '&': opcodes_js_1.Op.bitand,
+        '|': opcodes_js_1.Op.bitor,
+        '^': opcodes_js_1.Op.bitxor,
+        '==': opcodes_js_1.Op.equals,
+        '===': opcodes_js_1.Op.strictequals,
+        '<': opcodes_js_1.Op.lessthan,
+        '<=': opcodes_js_1.Op.lessequals,
+        '>': opcodes_js_1.Op.greaterthan,
+        '>=': opcodes_js_1.Op.greaterequals,
+        instanceof: opcodes_js_1.Op.instanceof,
+        in: opcodes_js_1.Op.in,
+    };
+    const code = map[op];
+    if (code === undefined)
+        throw new Error(`Unsupported binary operator '${op}'`);
+    return code;
+}
+// ---------------------------------------------------------------------------
+// AST queries
+// ---------------------------------------------------------------------------
+function forEachChildStmt(s, f) {
+    switch (s.k) {
+        case 'if':
+            f(s.then);
+            if (s.else)
+                f(s.else);
+            break;
+        case 'while':
+        case 'dowhile':
+        case 'labeled':
+        case 'with':
+            f(s.body);
+            break;
+        case 'for':
+            if (s.init)
+                f(s.init);
+            f(s.body);
+            break;
+        case 'forin':
+            f(s.body);
+            break;
+        case 'block':
+            s.body.forEach(f);
+            break;
+        case 'switch':
+            for (const c of s.cases)
+                c.body.forEach(f);
+            break;
+        case 'try':
+            s.body.forEach(f);
+            for (const c of s.catches)
+                c.body.forEach(f);
+            s.finally?.forEach(f);
+            break;
+    }
+}
+/** Collects hoisted `var` declarations (and function declarations) of a function body. */
+function collectVars(list, out) {
+    const visit = (s) => {
+        if (s.k === 'var')
+            out.push(...s.decls);
+        else if (s.k === 'forin' && s.decl)
+            out.push(s.decl);
+        else if (s.k === 'function')
+            out.push({ name: s.fn.name, pos: s.pos, type: { name: 'Function', pos: s.pos } });
+        forEachChildStmt(s, visit);
+    };
+    list.forEach(visit);
+}
+function walkAllExprs(list, f) {
+    const ex = (e) => {
+        if (!e)
+            return;
+        if (f(e) === false)
+            return;
+        for (const v of Object.values(e)) {
+            if (Array.isArray(v)) {
+                for (const x of v) {
+                    if (x && typeof x === 'object' && 'k' in x && 'pos' in x)
+                        ex(x);
+                    else if (x && typeof x === 'object' && 'value' in x)
+                        ex(x.value);
+                }
+            }
+            else if (v && typeof v === 'object' && 'k' in v && 'pos' in v)
+                ex(v);
+        }
+    };
+    const st = (s) => {
+        switch (s.k) {
+            case 'expr':
+            case 'throw':
+                ex(s.e);
+                break;
+            case 'return':
+                ex(s.e);
+                break;
+            case 'var':
+                s.decls.forEach((d) => ex(d.init));
+                break;
+            case 'if':
+            case 'while':
+            case 'dowhile':
+                ex(s.c);
+                break;
+            case 'for':
+                ex(s.c);
+                ex(s.update);
+                break;
+            case 'forin':
+                ex(s.obj);
+                ex(s.target);
+                break;
+            case 'switch':
+                ex(s.disc);
+                s.cases.forEach((c) => ex(c.test));
+                break;
+            case 'with':
+                ex(s.obj);
+                break;
+            case 'dxns':
+                ex(s.e);
+                break;
+            case 'function':
+                f({ k: 'function', fn: s.fn, pos: s.pos });
+                break;
+        }
+        forEachChildStmt(s, st);
+    };
+    list.forEach(st);
+}
+function containsFunction(list) {
+    let found = false;
+    walkAllExprs(list, (e) => {
+        if (e.k === 'function') {
+            found = true;
+            return false;
+        }
+    });
+    return found;
+}
+function usesArguments(list) {
+    let found = false;
+    walkAllExprs(list, (e) => {
+        if (e.k === 'function')
+            return false;
+        if (e.k === 'id' && e.name === 'arguments')
+            found = true;
+    });
+    return found;
+}
+function hasSuperCall(list) {
+    let found = false;
+    walkAllExprs(list, (e) => {
+        if (e.k === 'function')
+            return false;
+        if (e.k === 'call' && e.fn.k === 'super')
+            found = true;
+    });
+    return found;
+}