16 lines
973 B
Plaintext
16 lines
973 B
Plaintext
1 .module wc_fentry
|
|
2 .area _CODE
|
|
00006006 3 WC_ENTRY = 0x6006
|
|
4 .globl _wc_fentry
|
|
00000000 5 _wc_fentry::
|
|
00000000 DD E5 [15] 6 push ix
|
|
7 ; HL = name (sdcccall(1); WC нужен HL — уже на месте!)
|
|
00000002 3E 3B [ 7] 8 ld a, #0x3B
|
|
00000004 CD 06 60 [17] 9 call WC_ENTRY
|
|
00000007 3E 00 [ 7] 10 ld a, #0
|
|
00000009 28 01 [12] 11 jr z, _wc_fentry_end
|
|
0000000B 3C [ 4] 12 inc a
|
|
0000000C 13 _wc_fentry_end:
|
|
0000000C DD E1 [14] 14 pop ix
|
|
0000000E C9 [10] 15 ret
|