DECLARE	CLIENT$PSB$SLOT		LITERALLY	'5',
		SERVER$PSB$SLOT		LITERALLY	'5',
		CLIENT$PORT$ID		LITERALLY	'800H',
		SERVER$PORT$ID		LITERALLY	'801H';

DECLARE	ASYNC$MODE			LITERALLY	'16',
		CR					LITERALLY	'0DH',
		DATA$SERVICE		LITERALLY	'2',
		E$OK				LITERALLY	'0',
		E$TIME				LITERALLY	'1',
		FALSE				LITERALLY	'0',
		FIFO$PORT$QUEUEING	LITERALLY	'0',
		LF					LITERALLY	'0AH',
		PRIO$PORT$QUEUEING	LITERALLY	'2',
		SIGNAL$SERVICE		LITERALLY	'3',
		TOKEN				LITERALLY	'SELECTOR',
		TRUE				LITERALLY	'0FFH',
		WAIT$FOREVER		LITERALLY	'0FFFFH';

DECLARE	EX_HANDLER_STRUCT	LITERALLY	'STRUCTURE (
		proc$addr			POINTER,
		mode				BYTE,
		filler				BYTE)';

DECLARE	MSG_INFO_STRUCT		LITERALLY	'STRUCTURE (
		flags				WORD,
		status				WORD,
		trans$id			WORD,
		data$length			DWORD,
		forwarding$port		TOKEN,
		remote$socket		DWORD,
		control$msg(20)		BYTE,
		reserved(4)			BYTE)';

DECLARE	PORT_INFO_STRUCT	LITERALLY	'STRUCTURE (
		portid				WORD,
		type				BYTE,
		reserved			BYTE,
		flags				WORD)';

DECLARE	SIG_PORT_INFO_STRUCT	LITERALLY	'STRUCTURE (
		message$id			BYTE,
		reserved1			BYTE,
		type				BYTE,
		reserved2			BYTE,
		flags				WORD)';