tcp_pageout.asm
bitfixer_bitfixer/dg/z88dk/libsrc/net/tcp_pageout.asm
;
;	This file is automatically generated
;
;	Do not edit!!!
;
;	djm 12/2/2000
;
;	ZSock Lib function: tcp_pageout


	PUBLIC	tcp_pageout

	EXTERN	no_zsock

	INCLUDE	"packages.def"
	INCLUDE	"zsock.def"

.tcp_pageout
	pop	de	;ret address
	pop	hl	;l holds bank to page in
	push	hl
	push	de
	call_pkg(tcp_pgout)
	ret	nc
; We failed..are we installed?
	cp	rc_pnf
	scf		;signal error
	ret	nz	;Internal error
	call_pkg(tcp_ayt)
	jr	nc,tcp_pageout
	jp	no_zsock
