home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / modules.lha / modules / rexx / rexxio.m < prev    next >
Encoding:
Text File  |  2000-06-04  |  611 b   |  41 lines
  1. MODULE    'rexx/storage',
  2.             'exec/ports',
  3.             'exec/lists'
  4.  
  5. CONST    RXBUFFSZ=204            // buffer length
  6.  
  7. OBJECT IoBuff
  8.     Node:RexxRsrc,
  9.     Rpt:APTR,
  10.     Rct:LONG,
  11.     DFH:LONG,
  12.     Lock:APTR,
  13.     Bct:LONG,
  14.     Area[RXBUFFSZ]:BYTE
  15.  
  16. ENUM    RXIO_EXIST=-1,
  17.         RXIO_STRF,
  18.         RXIO_READ,
  19.         RXIO_WRITE,
  20.         RXIO_APPEND
  21.  
  22. ENUM    RXIO_BEGIN=-1,
  23.         RXIO_CURR,
  24.         RXIO_END
  25.  
  26. #define LLOFFSET(rrp) (rrp.Arg1)   /* "Query" offset        */
  27. #define LLVERS(rrp)   (rrp.Arg2)   /* library version        */
  28. #define CLVALUE(rrp)  (rrp.Arg1)
  29.  
  30. OBJECT RexxMsgPort
  31.     Node:RexxRsrc,
  32.     Port:MP,
  33.     ReplyList:LH
  34.  
  35. ENUM    DT_DEV,
  36.         DT_DIR,
  37.         DT_VOL
  38.  
  39. CONST    ACTION_STACK=2002,
  40.         ACTION_QUEUE=2003
  41.