1
2; ===============================================================
3; Dec 2013
4; ===============================================================
5;
6; size_t p_stack_size(p_stack_t *s)
7;
8; Return number of items in stack.  O(n).
9;
10; ===============================================================
11
12SECTION code_clib
13SECTION code_adt_p_stack
14
15PUBLIC asm_p_stack_size
16
17EXTERN asm_p_forward_list_size
18
19defc asm_p_stack_size = asm_p_forward_list_size
20
21   ; enter : hl = p_stack_t *s
22   ;
23   ; exit  : hl = number of items in list
24   ;
25   ; uses  : af, de, hl
26