home *** CD-ROM | disk | FTP | other *** search
- #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
-