1 2SECTION code_clib 3SECTION code_l 4 5PUBLIC l_zeroword_hl 6 7 inc hl 8 inc hl 9 10 inc hl 11 inc hl 12 13l_zeroword_hl: 14 15 ; Common operation to zero word at offset from hl 16 ; 17 ; enter : hl = void *address 18 ; 19 ; exit : hl = void *address 20 ; *address = 0 21 ; 22 ; uses : none 23 24 ld (hl),0 25 inc hl 26 ld (hl),0 27 dec hl 28 29 ret 30