1
2SECTION code_clib
3SECTION code_l
4
5PUBLIC l_readword_hl
6
7   inc hl
8   inc hl
9
10   inc hl
11   inc hl
12
13   inc hl
14   inc hl
15
16   inc hl
17   inc hl
18
19l_readword_hl:
20
21   ; Common operation to read a word at offset from hl
22   ;
23   ; enter : hl = void *address
24   ;
25   ; exit  : hl = *hl
26   ;
27   ; uses  : a, hl
28
29   ld a,(hl)
30   inc hl
31   ld h,(hl)
32   ld l,a
33
34   ret
35