home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 411b.lha / dme_1.42 / src.LZH / src / rexx / rxsupplib.i < prev    next >
Text File  |  1988-07-31  |  1KB  |  47 lines
  1. * === rxsupplib.i ======================================================
  2. *
  3. * Copyright (c) 1986, 1987 by William S. Hawes (All Rights Reserved)
  4. *
  5. * ======================================================================
  6. * 
  7. * Include file for Rexx Support Library
  8.  
  9.          IFND     REXX_RXSUPPLIB_I
  10. REXX_RXSUPPLIB_I  SET   1
  11.  
  12.          IFND     REXX_STORAGE_I
  13.          INCLUDE  "rexx/storage.i"
  14.          ENDC
  15.  
  16.          IFND     REXX_RXSLIB_I
  17.          INCLUDE  "rexx/rxslib.i"
  18.          ENDC
  19.  
  20. * Structure definition for the Rexx Support Library
  21.          STRUCTURE RexxSupport,LIB_SIZE
  22.          APTR     rs_SysBase           ; EXEC base
  23.          APTR     rs_REXXBase          ; Rexx System Library base
  24.          LONG     rs_SegList           ; library seglist
  25.          LABEL    rs_SIZEOF
  26.  
  27. RSNAME   MACRO
  28.          dc.b     'rexxsupport.library',0
  29.          ENDM
  30.  
  31. RSID     MACRO
  32.          dc.b     'rexxsupport 1.0 (22 AUG 87)',13,10,0
  33.          ENDM
  34.  
  35. RSVERS   EQU   2
  36. RSREV    EQU   1
  37.  
  38. * Various system constants
  39. MemList     EQU   $142                 ; Memory list
  40. DeviceList  EQU   $15E                 ; Devices list
  41. LibList     EQU   $17A                 ; Libraries list
  42. PortList    EQU   $188                 ; Ports list
  43. ReadyList   EQU   $196                 ; Ready Tasks
  44. WaitList    EQU   $1A4                 ; Waiting Tasks
  45.  
  46.          ENDC
  47.