*	ARexx.asm
*	These routines call the ARexx resident process.

        SECTION Arexx,CODE

	XREF	_RexxSysBase

_LVORexx	EQU	-30
*	XDEF	_LVORexx
_LVOrxParse	EQU	-36	; (private)
*	XDEF	_LVOrxParse
_LVOrxInstruct	EQU	-42	; (private)
*	XDEF	_LVOrxInstruct
_LVOrxSuspend	EQU	-48	; (private)
*	XDEF	_LVOrxSuspend
_LVOEvalOp	EQU	-54	; (private)
*	XDEF	_LVOEvalOp
_LVOAssignValue	EQU	-60	; (private)
*	XDEF	_LVOAssignValue
_LVOEnterSymbol	EQU	-66	; (private)
*	XDEF	_LVOEnterSymbol
_LVOFetchValue	EQU	-72	; (private)
*	XDEF	_LVOFetchValue
_LVOLookUpValue	EQU	-78	; (private)
*	XDEF	_LVOLookUpValue
_LVOSetValue	EQU	-84	; (private)
*	XDEF	_LVOSetValue
_LVOSymExpand	EQU	-90	; (private)
*	XDEF	_LVOSymExpand

_LVOErrorMsg	EQU	-96
*	XDEF	_LVOErrorMsg
	XDEF	_ErrorMsg
_ErrorMsg
	move.l	8(sp),d0	; list
	move.l	_RexxSysBase,a6
	jsr	_LVOErrorMsg(a6)
	move.l	4(sp),a1
	move.l	a0,(a1)
	rts

_LVOIsSymbol	EQU	-102
*	XDEF	_LVOIsSymbol
	XDEF	_IsSymbol
_IsSymbol
	move.l	8(sp),a0
	move.l	_RexxSysBase,a6
	jsr	_LVOIsSymbol(a6)
	move.l	4(sp),a0
	move.l	d1,(a0)
	rts

_LVOCurrentEnv	EQU	-108
*	XDEF	_LVOCurrentEnv
	XDEF	_CurrentEnv
_CurrentEnv
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOCurrentEnv(a6)

_LVOGetSpace	EQU	-114
*	XDEF	_LVOGetSpace
	XDEF	_GetSpace
_GetSpace
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOGetSpace(a6)

_LVOFreeSpace	EQU	-120
*	XDEF	_LVOFreeSpace
	XDEF	_FreeSpace
_FreeSpace
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOFreeSpace(a6)

_LVOCreateArgstring	EQU	-126
*	XDEF	_LVOCreateArgstring
	XDEF	_CreateArgstring
_CreateArgstring
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOCreateArgstring(a6)

_LVODeleteArgstring	EQU	-132
*	XDEF	_LVODeleteArgstring
	XDEF	_DeleteArgstring
_DeleteArgstring
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVODeleteArgstring(a6)

_LVOLengthArgstring	EQU	-138
*	XDEF	_LVOLengthArgstring
	XDEF	_LengthArgstring
_LengthArgstring
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOLengthArgstring(a6)

_LVOCreateRexxMsg	EQU	-144
*	XDEF	_LVOCreateRexxMsg
	XDEF	_CreateRexxMsg
_CreateRexxMsg
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOCreateRexxMsg(a6)

_LVODeleteRexxMsg	EQU	-150
*	XDEF	_LVODeleteRexxMsg
	XDEF	_DeleteRexxMsg
_DeleteRexxMsg
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVODeleteRexxMsg(a6)

_LVOClearRexxMsg	EQU	-156
*	XDEF	_LVOClearRexxMsg
	XDEF	_ClearRexxMsg
_ClearRexxMsg
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOClearRexxMsg(a6)

_LVOFillRexxMsg		EQU	-162
*	XDEF	_LVOFillRexxMsg
	XDEF	_FillRexxMsg
_FillRexxMsg
	move.l	12(sp),a0
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOFillRexxMsg(a6)

_LVOIsRexxMsg		EQU	-168
*	XDEF	_LVOIsRexxMsg
	XDEF	_IsRexxMsg
_IsRexxMsg
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOIsRexxMsg(a6)


_LVOAddRsrcNode		EQU	-174
*	XDEF	_LVOAddRsrcNode
	XDEF	_AddRsrcNode
_AddRsrcNode
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOAddRsrcNode(a6)

_LVOFindRsrcNode	EQU	-180
*	XDEF	_LVOFindRsrcNode
	XDEF	_FindRsrcNode
_FindRsrcNode
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOFindRsrcNode(a6)

_LVORemRsrcList		EQU	-186
*	XDEF	_LVORemRsrcList
	XDEF	_RemRsrcList
_RemRsrcList
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVORemRsrcList(a6)

_LVORemRsrcNode		EQU	-192
*	XDEF	_LVORemRsrcNode
	XDEF	_RemRsrcNode
_RemRsrcNode
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVORemRsrcNode(a6)

_LVOOpenPublicPort	EQU	-198
*	XDEF	_LVOOpenPublicPort
	XDEF	_OpenPublicPort
_OpenPublicPort
	move.l	8(sp),a0
	move.l	4(sp),a1
	move.l	_RexxSysBase,a6
	jmp	_LVOOpenPublicPort(a6)

_LVOClosePublicPort	EQU	-204
*	XDEF	_LVOClosePublicPort
	XDEF	_ClosePublicPort
_ClosePublicPort
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOClosePublicPort(a6)

_LVOListNames		EQU	-210
*	XDEF	_LVOListNames
	XDEF	_ListNames
_ListNames
	move.l	6(sp),a0
	move.w	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOListNames(a6)


_LVOClearMem		EQU	-216
*	XDEF	_LVOClearMem
	XDEF	_ClearMem
_ClearMem
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOClearMem(a6)

_LVOInitList		EQU	-222
*	XDEF	_LVOInitList
	XDEF	_InitList
_InitList
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOInitList(a6)

_LVOInitPort		EQU	-228
*	XDEF	_LVOInitPort
	XDEF	_InitPort
_InitPort
	move.l	8(sp),a0
	move.l	4(sp),a1
	move.l	_RexxSysBase,a6
	jmp	_LVOInitPort(a6)

_LVOFreePort		EQU	-234
*	XDEF	_LVOFreePort
	XDEF	_FreePort
_FreePort
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOFreePort(a6)

_LVOCmpString		EQU	-240
*	XDEF	_LVOCmpString
	XDEF	_CmpString
_CmpString
	move.l	8(sp),a0
	move.l	4(sp),a1
	move.l	_RexxSysBase,a6
	jmp	_LVOCmpString(a6)

_LVOStcToken		EQU	-246
*	XDEF	_LVOStcToken
	XDEF	_StcToken
_StcToken
	move.l	20(sp),a0
	move.l	_RexxSysBase,a6
	jsr	_LVOStcToken(a6)
	move.l	16(sp),a6
	move.b	d0,(a6)
	move.l	12(sp),a6
	move.l	d1,(a6)
	move.l	8(sp),a6
	move.l	a0,(a6)
	move.l	4(sp),a6
	move.l	a1,(a6)
	rts

_LVOStrcmpN	EQU	-252
*	XDEF	_LVOStrcmpN
	XDEF	_StrcmpN
_StrcmpN
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrcmpN(a6)

_LVOStrcmpU	EQU	-258
*	XDEF	_LVOStrcmpU

_LVOStrcpyA	EQU	-264
*	XDEF	_LVOStrcpyA
	XDEF	_StrcpyA
_StrcpyA
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrcpyA(a6)

_LVOStrcpyN	EQU	-270
*	XDEF	_LVOStrcpyN
	XDEF	_StrcpyN
_StrcpyN
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrcpyN(a6)

_LVOStrcpyU	EQU	-276
*	XDEF	_LVOStrcpyU
	XDEF	_StrcpyU
_StrcpyU
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrcpyU(a6)

_LVOStrflipN	EQU	-282
*	XDEF	_LVOStrflipN
	XDEF	_StrflipN
_StrflipN
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrflipN(a6)

_LVOStrlen	EQU	-288
*	XDEF	_LVOStrlen
	XDEF	_RexxStrlen
_RexxStrlen
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOStrlen(a6)

_LVOToUpper	EQU	-294
*	XDEF	_LVOToUpper
	XDEF	_ToUpper
_ToUpper
	move.w	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOToUpper(a6)

_LVOCVa2i	EQU	-300
*	XDEF	_LVOCVa2i
	XDEF	_CVa2i
_CVa2i
	move.l	8(sp),a0
	move.l	_RexxSysBase,a6
	jsr	_LVOCVa2i(a6)
	move.l	4(sp),a0
	move.l	d1,(a0)
	rts

_LVOCVi2a	EQU	-306
*	XDEF	_LVOCVi2a
	XDEF	_CVi2a
_CVi2a
	move.l	16(sp),a0
	move.l	12(sp),d0
	move.l	8(sp),d1
	move.l	_RexxSysBase,a6
	jsr	_LVOCVi2a(a6)
	move.l	4(sp),a1
	move.l	a0,(a1)
	rts

_LVOCVi2arg	EQU	-312
*	XDEF	_LVOCVi2arg
	XDEF	_CVi2arg
_CVi2arg
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOCVi2arg(a6)

_LVOCVi2az	EQU	-318
*	XDEF	_LVOCVi2az
	XDEF	_CVi2az
_CVi2az
	move.l	16(sp),a0
	move.l	12(sp),d0
	move.l	8(sp),d1
	move.l	_RexxSysBase,a6
	jsr	_LVOCVi2az(a6)
	move.l	4(sp),a1
	move.l	a0,(a1)
	rts

_LVOCVc2x	EQU	-324
*	XDEF	_LVOCVc2x
	XDEF	_CVc2x
_CVc2x
	move.l	16(sp),a0
	move.l	12(sp),a1
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOCVc2x(a6)

_LVOCVx2c	EQU	-330
*	XDEF	_LVOCVx2c
	XDEF	_CVx2c
_CVx2c
	move.l	16(sp),a0
	move.l	12(sp),a1
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOCVx2c(a6)

_LVOOpenF	EQU	-336
*	XDEF	_LVOOpenF
	XDEF	_OpenF
_OpenF
	move.l	16(sp),a0
	move.l	12(sp),a1
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOOpenF(a6)

_LVOCloseF	EQU	-342
*	XDEF	_LVOCloseF
	XDEF	_CloseF
_CloseF
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOCloseF(a6)

_LVOReadStr	EQU	-348
*	XDEF	_LVOReadStr
	XDEF	_ReadStr
_ReadStr
	move.l	16(sp),a0
	move.l	12(sp),a1
	move.l	8(sp),d0
	move.l	_RexxSysBase,a6
	jsr	_LVOReadStr(a6)
	move.l	4(sp),a0
	move.l	a1,(a0)
	rts

_LVOReadF	EQU	-354
*	XDEF	_LVOReadF
	XDEF	_ReadF
_ReadF
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOReadF(a6)

_LVOWriteF	EQU	-360
*	XDEF	_LVOWriteF
	XDEF	_WriteF
_WriteF
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOWriteF(a6)

_LVOSeekF	EQU	-366
*	XDEF	_LVOSeekF
	XDEF	_SeekF
_SeekF
	move.l	12(sp),a0
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOSeekF(a6)

_LVOQueueF	EQU	-372
*	XDEF	_LVOQueueF
	XDEF	_QueueF
_QueueF
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOQueueF(a6)

_LVOStackF	EQU	-378
*	XDEF	_LVOStackF
	XDEF	_StackF
_StackF
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOStackF(a6)

_LVOExistF	EQU	-384
*	XDEF	_LVOExistF
	XDEF	_ExistF
_ExistF
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVOExistF(a6)

_LVODOSCommand		EQU	-390
*	XDEF	_LVODOSCommand

_LVODOSRead		EQU	-396
*	XDEF	_LVODOSRead
	XDEF	_RexxDOSRead
_RexxDOSRead
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVODOSRead(a6)

_LVODOSWrite		EQU	-402
*	XDEF	_LVODOSWrite
	XDEF	_RexxDOSWrite
_RexxDOSWrite
	move.l	12(sp),a0
	move.l	8(sp),a1
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVODOSWrite(a6)

_LVOCreateDOSPkt	EQU	-408
*	XDEF	_LVOCreateDOSPkt
	XDEF	_CreateDOSPkt
_CreateDOSPkt
	move.l	_RexxSysBase,a6
	jmp	_LVOCreateDOSPkt(a6)

_LVODeleteDOSPkt	EQU	-414
*	XDEF	_LVODeleteDOSPkt
	XDEF	_DeleteDOSPkt
_DeleteDOSPkt
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVODeleteDOSPkt(a6)

_LVOSendDOSPkt		EQU	-420	; private
_LVOWaitDOSPkt		EQU	-426	; private
_LVOFindDevice		EQU	-432
*	XDEF	_LVOFindDevice
	XDEF	_FindDevice
_FindDevice
	move.l	8(sp),a0
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOFindDevice(a6)


_LVOAddClipNode		EQU	-438
*	XDEF	_LVOAddClipNode
	XDEF	_AddClipNode
_AddClipNode
	move.l	16(sp),a0
	move.l	12(sp),a1
	move.l	8(sp),d0
	move.l	4(sp),d1
	move.l	_RexxSysBase,a6
	jmp	_LVOAddClipNode(a6)

_LVORemClipNode		EQU	-444
*	XDEF	_LVORemClipNode
	XDEF	_RemClipNode
_RemClipNode
	move.l	4(sp),a0
	move.l	_RexxSysBase,a6
	jmp	_LVORemClipNode(a6)

_LVOLockRexxBase	EQU	-450
*	XDEF	_LVOLockRexxBase
	XDEF	_LockRexxBase
_LockRexxBase
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOLockRexxBase(a6)

_LVOUnlockRexxBase	EQU	-456
*	XDEF	_LVOUnlockRexxBase
	XDEF	_UnlockRexxBase
_UnlockRexxBase
	move.l	4(sp),d0
	move.l	_RexxSysBase,a6
	jmp	_LVOUnlockRexxBase(a6)

	END