;
;	File ENet.a
;
;	Copyright Apple Computer, Inc.  1990
;	All Rights Reserved.
;
;	07/20/90	JAL		Created.
;

		STRING	ASIS
		PRINT	OFF
		INCLUDE	 'SysEqu.a'
		INCLUDE	 'Traps.a'
		INCLUDE	 'SysErr.a'
		INCLUDE	 'ENetEqu.a'
		PRINT 	ON
              
nENetCalls    PROC	 EXPORT

		EXPORT	ESetGeneral, EGetInfo, ERdCancel, ERead
		EXPORT	EWrite, EDetachPH, EAttachPH, EAddMulti, EDelMulti

ESetGeneral
		MOVE.W	#ENetSetGeneral,D0
		BRA.S	CtlCall

EGetInfo
		MOVE.W	#ENetGetInfo,D0
		BRA.S	CtlCall

ERdCancel
		MOVE.W	#ENetRdCancel,D0
		BRA.S	CtlCall

ERead
		MOVE.W	#ENetRead,D0
		BRA.S	CtlCall

EWrite
		MOVE.W	#ENetWrite,D0
		BRA.S	CtlCall

EDetachPH
		MOVE.W	#ENetDetachPH,D0
		BRA.S	CtlCall

EAttachPH
		MOVE.W	#ENetAttachPH,D0
		BRA.S	CtlCall

EAddMulti
		MOVE.W	#ENetAddMulti,D0
		BRA.S	CtlCall

EDelMulti
		MOVE.W	#ENetDelMulti,D0

CtlCall
		Move.L	(SP)+,A1			;return address (Reg call preserves A1)
		Move.B	(SP)+,D1			;Get ASync flag.
		Move.L	(SP)+,A0 			;get param pointer.
		MOVE.W	D0,CSCode(A0)		;csCode in param block to do right call.
		TST.B	D1					;test ASync flag.
		BNE.S	@1

		_Control					;tell OS to do it Synchronously
		BrA.S	@2

@1		_Control	,ASYNC			;Tell OS to do it Asynchronously

@2		Move.W  D0,(SP)				;set function result
		Jmp		(A1)				;return to caller


		ENDPROC
				
          END