//MACRO     BREAK     Id= !""
//--------------------------------------------------------------------------------------------------
//
//  @ CopyRight Roberti & Parau Enterprises, Inc.  2021-2023
//
//  This work is licensed under the Creative Commons Attribution-NoDerivatives 4.0 International License.
//  To view a copy of this license, visit http://creativecommons.org/licenses/by-nd/4.0/
//   or send a letter to Creative Commons, PO Box 1866, Mountain View, CA 94042, USA.
//
//--------------------------------------------------------------------------------------------------
//
    var nestStack= DVASM.getJSGlobal("__arch_condNestBlockStack");
    if (nestStack == null)
        nestStack= [];
    
    //
    //  Search outer WHILE nest with matching ID is specified
    //
    var targetBlock;
    for (var i= nestStack.length-1; i >= 0; i--) {
        targetBlock= nestStack[i];
        if (targetBlock[0] == "WHILE" || targetBlock[0] == "DO") {
            if (Id === "")
                break;
            if (targetBlock[1] == Id)
                break;
        }
        targetBlock= null;
    }

    if (targetBlock == null)
        return DVASM.putError("Unable to find an outer nest block with opcode of [ WHILE ] or [ DO ]" +
            (Id === "" ? "" : " with Id=" + Id));
    
    //
    //  Branch to end of block
    //
    DVASM.formatLine(Label, "JAL", targetBlock[3], "");