//MACRO Stack ParmArea{integer}= 0 //-------------------------------------------------------------------------------------------------- // // @ 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. // //-------------------------------------------------------------------------------------------------- // // // Map the stack // if (Label === "") return DVASM.putError("Statement label is required for macro STACK"); DVASM.putJSGlobal("__arch_currStackLabel", Label); var lbl= Label + "."; // // Get word size // eval(DVASM.getEnv()[4]); var wrd= abiWID + "WRD"; var align= abiWLen*2; // // Set alignment // DVASM.formatLine(Label, "MMAP", "Align=" + align, ""); // // Insert parm area if any // if (ParmArea > 0) DVASM.formatLine(lbl + "parms", wrd, "0[" + (Math.floor((ParmArea+1)/2)*2) + "]", "// Parameter area");