#ifndef REXX_RXSLIB_H
#define REXX_RXSLIB_H
/*
** $Filename: rexx/rxslib.h $
** $Release: 2.04 Includes, V37.4 $
** $Revision: 1.6 $
** $Date: 91/11/08 $
**
** The header file for the REXX Systems Library
**
** (C) Copyright 1987,1988,1989,1990 William S. Hawes
** (C) Copyright 1990-1991 Commodore-Amiga, Inc.
** All Rights Reserved
*/

#ifndef REXX_STORAGE_H
#include "rexx/storage.h"
#endif

#define RXSNAME "rexxsyslib.library"
#define RXSDIR "REXX"
#define RXSTNAME "ARexx"




struct RxsLib {
 struct Library rl_Node; 
 UBYTE rl_Flags; 
 UBYTE rl_Shadow; 
 APTR rl_SysBase; 
 APTR rl_DOSBase; 
 APTR rl_IeeeDPBase; 
 LONG rl_SegList; 
 LONG rl_NIL; 
 LONG rl_Chunk; 
 LONG rl_MaxNest; 
 struct NexxStr *rl_NULL; 
 struct NexxStr *rl_FALSE; 
 struct NexxStr *rl_TRUE; 
 struct NexxStr *rl_REXX; 
 struct NexxStr *rl_COMMAND; 
 struct NexxStr *rl_STDIN; 
 struct NexxStr *rl_STDOUT; 
 struct NexxStr *rl_STDERR; 
 STRPTR rl_Version; 

 STRPTR rl_TaskName; 
 LONG rl_TaskPri; 
 LONG rl_TaskSeg; 
 LONG rl_StackSize; 
 STRPTR rl_RexxDir; 
 STRPTR rl_CTABLE; 
 STRPTR rl_Notice; 

 struct MsgPort rl_RexxPort; 
 UWORD rl_ReadLock; 
 LONG rl_TraceFH; 
 struct List rl_TaskList; 
 WORD rl_NumTask; 
 struct List rl_LibList; 
 WORD rl_NumLib; 
 struct List rl_ClipList; 
 WORD rl_NumClip; 
 struct List rl_MsgList; 
 WORD rl_NumMsg; 
 struct List rl_PgmList; 
 WORD rl_NumPgm; 

 UWORD rl_TraceCnt; 
 WORD rl_avail;
 };


#define RLFB_TRACE RTFB_TRACE 
#define RLFB_HALT RTFB_HALT 
#define RLFB_SUSP RTFB_SUSP 
#define RLFB_STOP 6 
#define RLFB_CLOSE 7 

#define RLFMASK (1<<RLFB_TRACE) | (1<<RLFB_HALT) | (1<<RLFB_SUSP)


#define RXSCHUNK 1024 
#define RXSNEST 32 
#define RXSTPRI 0 
#define RXSSTACK 4096 


#define CTB_SPACE 0 
#define CTB_DIGIT 1 
#define CTB_ALPHA 2 
#define CTB_REXXSYM 3 
#define CTB_REXXOPR 4 
#define CTB_REXXSPC 5 
#define CTB_UPPER 6 
#define CTB_LOWER 7 


#define CTF_SPACE (1 << CTB_SPACE)
#define CTF_DIGIT (1 << CTB_DIGIT)
#define CTF_ALPHA (1 << CTB_ALPHA)
#define CTF_REXXSYM (1 << CTB_REXXSYM)
#define CTF_REXXOPR (1 << CTB_REXXOPR)
#define CTF_REXXSPC (1 << CTB_REXXSPC)
#define CTF_UPPER (1 << CTB_UPPER)
#define CTF_LOWER (1 << CTB_LOWER)

#endif