/***************************************************************\
    |                                                               |
    |                   R 2 X M G R . E X T                         |
    |                                                               |
    | EXTERNAL declarations for the user-level iMMX 800 interfaces. |
    |     (Assumes prior inclusion of the R2MMX.LIT file.)          |
    \***************************************************************/


cqfind:
   PROCEDURE (function$name,status$ptr) ADDRESS EXTERNAL;
   DECLARE function$name  WORD,
           status$ptr     ADDRESS;
   /* RETURNS connection$id WORD; */
END cqfind;


cqlose:
   PROCEDURE (connection$id) EXTERNAL;
   DECLARE connection$id WORD;
END cqlose;


cqactv:
   PROCEDURE (function$name, status$ptr) ADDRESS EXTERNAL;
   DECLARE function$name  WORD,
           status$ptr     ADDRESS,
           exch$adr       ADDRESS;
END cqactv;


cqdact:
   PROCEDURE (function$name, status$ptr) EXTERNAL;
   DECLARE function$name  WORD,
           status$ptr     ADDRESS;
END cqdact;


cqxfer:
   PROCEDURE(connection$id, msg$ptr,xfer$flag, xfer$len, status$ptr) EXTERNAL;
   DECLARE connection$id WORD,
           msg$ptr       ADDRESS,
           xfer$flag     BYTE,
           xfer$len      WORD,
           status$ptr    ADDRESS;
END cqxfer;



cqgdpa:
  PROCEDURE (port$token) BYTE EXTERNAL;
  DECLARE port$token  ADDRESS;
  END cqgdpa;