outp_callee.asm
bitfixer_bitfixer/dg/z88dk/libsrc/stdlib/outp_callee.asm
; void outp_callee(uint port, uchar byte)
; 09.2005 aralbrec

PUBLIC outp_callee
PUBLIC ASMDISP_OUTP_CALLEE

.outp_callee

   pop af
   pop de
   pop bc
   push af

.asmentry

   ; bc = port
   ; e = byte

IF FORrcmx000

   ld h,b
   ld l,c
   ld a,e
   defb 0d3h ; ioi
   ld (hl),a

ELSE

   out (c),e

ENDIF

   ret

DEFC ASMDISP_OUTP_CALLEE = # asmentry - outp_callee
