asm_wa_stack_size.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/adt/wa_stack/z80/asm_wa_stack_size.asm

; ===============================================================
; Mar 2014
; ===============================================================
; 
; size_t wa_stack_size(wa_stack_t *s)
;
; Return number of words in stack.
;
; ===============================================================

SECTION code_clib
SECTION code_adt_wa_stack

PUBLIC asm_wa_stack_size

EXTERN l_readword_2_hl

defc asm_wa_stack_size = l_readword_2_hl - 2

   ; enter : hl = stack *
   ;
   ; exit  : hl = number of words in stack
   ;
   ; uses  : a, hl
