* misc/arexxport.a

	SECTION	TEXT,CODE

*
*	MACHINE GENERATED		
*
	XREF	_ArexxPortBase

* A Arexxport library
_LVOOpenArexxPortA	EQU	-30

	XDEF	_LVOOpenArexxPortA
	XDEF	_OpenArexxPortA

_OpenArexxPortA:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),A1
	jsr	-30(A6)
	move.l	(SP)+,A6
	rts


	XDEF	_OpenArexxPort

_OpenArexxPort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	lea	12(SP),A1
	jsr	-30(A6)
	move.l	(SP)+,A6
	rts

_LVOCloseArexxPort	EQU	-36

	XDEF	_LVOCloseArexxPort
	XDEF	_CloseArexxPort

_CloseArexxPort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	jsr	-36(A6)
	move.l	(SP)+,A6
	rts

_LVOCheckArexxPort	EQU	-42

	XDEF	_LVOCheckArexxPort
	XDEF	_CheckArexxPort

_CheckArexxPort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	jsr	-42(A6)
	move.l	(SP)+,A6
	rts

_LVOReplyArexxPort	EQU	-48

	XDEF	_LVOReplyArexxPort
	XDEF	_ReplyArexxPort

_ReplyArexxPort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	jsr	-48(A6)
	move.l	(SP)+,A6
	rts

_LVOLaunchArexx	EQU	-54

	XDEF	_LVOLaunchArexx
	XDEF	_LaunchArexx

_LaunchArexx:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),A1
	move.l	16(SP),D0
	move.l	20(SP),D1
	jsr	-54(A6)
	move.l	(SP)+,A6
	rts

_LVOSetArexxReturns	EQU	-60

	XDEF	_LVOSetArexxReturns
	XDEF	_SetArexxReturns

_SetArexxReturns:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),D0
	move.l	16(SP),A1
	jsr	-60(A6)
	move.l	(SP)+,A6
	rts

_LVOSetArexxError	EQU	-66

	XDEF	_LVOSetArexxError
	XDEF	_SetArexxError

_SetArexxError:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),A1
	move.l	16(SP),D0
	jsr	-66(A6)
	move.l	(SP)+,A6
	rts

_LVOSetArexxStem	EQU	-72

	XDEF	_LVOSetArexxStem
	XDEF	_SetArexxStem

_SetArexxStem:
	movem.l	A2/A3/A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	16(SP),A0
	move.l	20(SP),A1
	move.l	24(SP),A2
	move.l	28(SP),A3
	jsr	-72(A6)
	movem.l	(SP)+,A2/A3/A6
	rts

_LVOPutToArexxPort	EQU	-78

	XDEF	_LVOPutToArexxPort
	XDEF	_PutToArexxPort

_PutToArexxPort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),D1
	jsr	-78(A6)
	move.l	(SP)+,A6
	rts

_LVOArexxMacroAbort	EQU	-84

	XDEF	_LVOArexxMacroAbort
	XDEF	_ArexxMacroAbort

_ArexxMacroAbort:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	move.l	12(SP),D0
	jsr	-84(A6)
	move.l	(SP)+,A6
	rts

_LVOArexxMacroPending	EQU	-90

	XDEF	_LVOArexxMacroPending
	XDEF	_ArexxMacroPending

_ArexxMacroPending:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	jsr	-90(A6)
	move.l	(SP)+,A6
	rts

*
* These entry points added in v37
*
_LVOReturnArexxError	EQU	-96

	XDEF	_LVOReturnArexxError
	XDEF	_ReturnArexxError

_ReturnArexxError:
	move.l	A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	8(SP),A0
	jsr	-96(A6)
	move.l	(SP)+,A6
	rts

_LVOSetArexxReturnVar	EQU	-102

	XDEF	_LVOSetArexxReturnVar
	XDEF	_SetArexxReturnVar

_SetArexxReturnVar:
	movem.l	A2/A6,-(SP)
	move.l	_ArexxPortBase,A6
	move.l	12(SP),A0
	move.l	16(SP),D0
	move.l	20(SP),A1
	move.l	24(SP),A2
	jsr	-102(A6)
	movem.l	(SP)+,A2/A6
	rts

* _LVODoFunction	EQU	-108
*
*	XDEF	_LVODoFunction
*	XDEF	_DoFunction
*
* _DoFunction:
*	move.l	A6,-(SP)
*	move.l	_ArexxPortBase,A6
*	move.l	8(SP),A0
*	jsr	-108(A6)
*	move.l	(SP)+,A6
*	rts


	END