//MACRO     Sll.pop    Anchor,  Node,	NullLbl,    WReg,	FieldDispl= 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.
//
//--------------------------------------------------------------------------------------------------
//
    //
    //  Get load/store MIs and word length
    //
    eval(DVASM.getEnv()[4]);
    var ld= "L" + abiWID;
    var st= "S" + abiWID;
    var wl= abiWLen;
    
    var nextField= FieldDispl;
    
    //
    //  Generate code
    //
\#Label		#ld			#Node, #Anchor						// Load first node addr in stack
\			IF			( #Node == 0 ), GOTO, ID= #NullLbl	// List is empty
\			#ld			#WReg, #nextField[#Node]			// Get next node addr
\			#st			#WReg, #Anchor						// Make it first in list