IFND	REXX_STORAGE_I
REXX_STORAGE_I	EQU	1
*	$Filename: rexx/storage.i $
*	$Release: 2.04 Includes, V37.4 $
*	$Revision: 1.8 $
*	$Date: 91/11/08 $
*	Include file for REXX data structures and memory/storage management.
*	(C) Copyright 1986,1987,1988,1989,1990 William S. Hawes.
*	(C) Copyright 1990-1991 Commodore-Amiga, Inc.
*		All Rights Reserved
	IFND	EXEC_TYPES_I
	INCLUDE	"exec/types.i"
	ENDC
	IFND	EXEC_NODES_I
	INCLUDE	"exec/nodes.i"
	ENDC
	IFND	EXEC_LISTS_I
	INCLUDE	"exec/lists.i"
	ENDC
	IFND	EXEC_PORTS_I
	INCLUDE	"exec/ports.i"
	ENDC
	IFND	EXEC_LIBRARIES_I
	INCLUDE	"exec/libraries.i"
	ENDC
	RSRESET
NexxStr	rs.b	0
ns_Ivalue	rs	2
ns_Length	rs	1
ns_Flags	rs.b	1
ns_Hash	rs.b	1
ns_Buff	rs.b	8
NSMINSIZE	rs.b	0
NXADDLEN	EQU	ns_Buff+1
IVALUE	EQU	ns_Ivalue
NSB_KEEP	EQU	0
NSB_STRING	EQU	1
NSB_NOTNUM	EQU	2
NSB_NUMBER	EQU	3
NSB_BINARY	EQU	4
NSB_FLOAT	EQU	5
NSB_EXT	EQU	6
NSB_SOURCE	EQU	7
NSF_KEEP	EQU	1<<NSB_KEEP
NSF_STRING	EQU	1<<NSB_STRING
NSF_NOTNUM	EQU	1<<NSB_NOTNUM
NSF_NUMBER	EQU	1<<NSB_NUMBER
NSF_BINARY	EQU	1<<NSB_BINARY
NSF_FLOAT	EQU	1<<NSB_FLOAT
NSF_EXT	EQU	1<<NSB_EXT
NSF_SOURCE	EQU	1<<NSB_SOURCE
NSF_INTNUM	EQU	NSF_NUMBER!NSF_BINARY!NSF_STRING
NSF_DPNUM	EQU	NSF_NUMBER!NSF_FLOAT
NSF_ALPHA	EQU	NSF_NOTNUM!NSF_STRING
NSF_OWNED	EQU	NSF_SOURCE!NSF_EXT!NSF_KEEP
KEEPSTR	EQU	NSF_STRING!NSF_SOURCE!NSF_NOTNUM
KEEPNUM	EQU	NSF_STRING!NSF_SOURCE!NSF_NUMBER!NSF_BINARY
	RSRESET
RexxArg	rs.b	0
ra_Size	rs	2
ra_Length	rs	1
ra_Flags	rs.b	1
ra_Hash	rs.b	1
ra_Buff	rs.b	8
RexxArg_SIZEOF	rs.b	0
	RSRESET
RexxMsg	rs.b	MN_SIZE
rm_TaskBlock	rs	2
rm_LibBase	rs	2
rm_Action	rs	2
rm_Result1	rs	2
rm_Result2	rs	2
rm_Args	rs.b	16*4
rm_PassPort	rs	2
rm_CommAddr	rs	2
rm_FileExt	rs	2
rm_Stdin	rs	2
rm_Stdout	rs	2
rm_avail	rs	2
RMSIZEOF	rs.b	0
ACTION	EQU	rm_Action
RESULT1	EQU	rm_Result1
RESULT2	EQU	rm_Result2
ARG0	EQU	rm_Args
ARG1	EQU	rm_Args+4
ARG2	EQU	rm_Args+8
MAXRMARG	EQU	15
RXCOMM	EQU	$1000000
RXFUNC	EQU	$2000000
RXCLOSE	EQU	$3000000
RXQUERY	EQU	$4000000
RXADDFH	EQU	$7000000
RXADDLIB	EQU	$8000000
RXREMLIB	EQU	$9000000
RXADDCON	EQU	$A000000
RXREMCON	EQU	$B000000
RXTCOPN	EQU	$C000000
RXTCCLS	EQU	$D000000
RXFB_NOIO	EQU	16
RXFB_RESULT	EQU	17
RXFB_STRING	EQU	18
RXFB_TOKEN	EQU	19
RXFB_NONRET	EQU	20
RXFF_RESULT	EQU	1<<RXFB_RESULT
RXFF_STRING	EQU	1<<RXFB_STRING
RXFF_TOKEN	EQU	1<<RXFB_TOKEN
RXFF_NONRET	EQU	1<<RXFB_NONRET
RXCODEMASK	EQU	$FF000000
RXARGMASK	EQU	$F
	RSRESET
RexxRsrc	rs.b	LN_SIZE
rr_Func	rs	1
rr_Base	rs	2
rr_Size	rs	2
rr_Arg1	rs	2
rr_Arg2	rs	2
RRSIZEOF	rs.b	0
RRTYPE	EQU	LN_TYPE
RRNAME	EQU	LN_NAME
RRSIZE	EQU	rr_Size
RRT_ANY	EQU	0
RRT_LIB	EQU	1
RRT_PORT	EQU	2
RRT_FILE	EQU	3
RRT_HOST	EQU	4
RRT_CLIP	EQU	5
GLOBALSZ	EQU	200
	RSRESET
RexxTask	rs.b	GLOBALSZ
rt_MsgPort	rs.b	MP_SIZE
rt_Flags	rs.b	1
rt_SigBit	rs.b	1
rt_ClientID	rs	2
rt_MsgPkt	rs	2
rt_TaskID	rs	2
rt_RexxPort	rs	2
rt_ErrTrap	rs	2
rt_StackPtr	rs	2
rt_Header1	rs.b	LH_SIZE
rt_Header2	rs.b	LH_SIZE
rt_Header3	rs.b	LH_SIZE
rt_Header4	rs.b	LH_SIZE
rt_Header5	rs.b	LH_SIZE
rt_SIZEOF	rs.b	0
ENVLIST	EQU	rt_Header1
FREELIST	EQU	rt_Header2
MEMLIST	EQU	rt_Header3
FILELIST	EQU	rt_Header4
PORTLIST	EQU	rt_Header5
NUMLISTS	EQU	5
RTFB_TRACE	EQU	0
RTFB_HALT	EQU	1
RTFB_SUSP	EQU	2
RTFB_TCUSE	EQU	3
RTFB_WAIT	EQU	6
RTFB_CLOSE	EQU	7
MEMQUANT	EQU	16
MEMMASK	EQU	$FFFFFFF0
MEMQUICK	EQU	1<<0
MEMCLEAR	EQU	1<<16
	RSRESET
SrcNode	rs.b	0
sn_Succ	rs	2
sn_Pred	rs	2
sn_Ptr	rs	2
sn_Size	rs	2
sn_SIZEOF	rs.b	0
	ENDC