$documentation: "A `throw` statement"
}, AST_Exit);
-var AST_LoopControl = DEFNODE("LoopControl", "label", {
+var AST_LoopControl = DEFNODE("LoopControl", "label loopcontrol_target", {
$documentation: "Base class for loop control statements (`break` and `continue`)",
_walk: function(visitor) {
return visitor._visit(this, this.label && function(){
$documentation: "Symbol naming the exception in catch",
}, AST_SymbolDeclaration);
-var AST_Label = DEFNODE("Label", null, {
+var AST_Label = DEFNODE("Label", "label_target", {
$documentation: "Symbol naming a label (declaration)",
}, AST_SymbolDeclaration);
}
if (node instanceof AST_Label) {
node.init_scope_vars();
+ var p = tw.parent(); // AST_LabeledStatement
+ var block = p.body;
+ if (block instanceof AST_StatementWithBody)
+ block = block.body;
+ node.label_target = block;
}
- if (node instanceof AST_SymbolLambda) {
+ if (node instanceof AST_LoopControl) {
+ if (!node.label) {
+ var a = tw.stack, i = a.length - 1;
+ while (--i >= 0) {
+ var p = a[i];
+ if (p instanceof AST_For
+ || p instanceof AST_ForIn
+ || p instanceof AST_DWLoop
+ || p instanceof AST_Switch) {
+ node.loopcontrol_target = p.body;
+ break;
+ }
+ }
+ }
+ }
+ else if (node instanceof AST_SymbolLambda) {
scope.def_function(node);
}
else if (node instanceof AST_SymbolDefun) {
return this.definition().global;
});
+AST_LoopControl.DEFMETHOD("target", function(){
+ if (this.label) return this.label.definition().label_target;
+ return this.loopcontrol_target;
+});
+
AST_Toplevel.DEFMETHOD("mangle_names", function(){
// We only need to mangle declaration nodes. Special logic wired
// into the code generator will display the mangled name if it's