//MACRO EndIf //-------------------------------------------------------------------------------------------------- // // @ 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= []; // // Check if inner nesting is IF, ANDIF, ELSEIF, ELSE // var n= nestStack.length-1; if (n < 0) DVASM.putError("No nest block is current to match [ENDIF]"); if (! ["IF", "ANDIF", "ELSEIF", "ELSE"].includes(nestStack[n][0])) return DVASM.putError("Inner nest block is [" + nestStack[n][0] + "] and cannot be ended by [ENDIF]"); // // End IF type nest block // if (Label !== "") DVASM.formatLine(Label, "BYTE", "0[0]", ""); if (nestStack[n][2] !== "") DVASM.formatLine(nestStack[n][2], "BYTE", "0[0]", ""); DVASM.formatLine(nestStack[n][3], "BYTE", "0[0]", ""); DVASM.formatLine("", "INDENTOUT", "", ""); nestStack.pop(); DVASM.putJSGlobal("__arch_condNestBlockStack", nestStack);