home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / m2 / CycloneModules.lha / modules / txt / Clipboard.def < prev    next >
Text File  |  1996-08-24  |  2KB  |  59 lines
  1. (*$ Implementation- *)
  2. DEFINITION MODULE Clipboard;
  3. (*    22-Aug-96/Stefan Tiemann for Cyclone *)
  4. (*   Converted from C-include: clipboard.h 36.5 (2.11.90), Includes Release 40.15 *)
  5.  
  6. IMPORT ED: ExecD;
  7. FROM SYSTEM IMPORT ADDRESS;
  8. CONST
  9.  clipboardName= "clipboard.device";
  10.  post= ED.nonstd;
  11.  currentReadId= ED.nonstd+1;
  12.  currentWriteId= ED.nonstd+2;
  13.  changeHook= ED.nonstd +3;
  14.  obsoleteId= 1;
  15.  
  16. TYPE
  17.  ClipboardUnitPartial= RECORD
  18.   node: ED.Node;    (* list of units *)
  19.   unitNum: LONGCARD;    (* unit number for this unit *)
  20.   (* the remaining unit data is private to the device *)
  21.  END;
  22.  ClipboardUnitPartialPtr= POINTER TO ClipboardUnitPartial;
  23.  
  24.  IOClipReq= RECORD
  25.   message: ED.Message;
  26.   device: ED.DevicePtr;    (* device node pointer    *)
  27.   unit: ClipboardUnitPartialPtr; (* unit node pointer *)
  28.   command: CARDINAL;    (* device command *)
  29.   flags: ED.IOFlagSet;    (* including QUICK and SATISFY *)
  30.   error: SHORTINT;        (* error or warning num *)
  31.   actual: LONGCARD;        (* number of bytes transferred *)
  32.   length: LONGCARD;        (* number of bytes requested *)
  33.   data: ADDRESS;           (* either clip stream or post port *)
  34.   offset: LONGCARD;        (* offset in clip stream *)
  35.   clipID: LONGINT;        (* ordinal clip identifier *)
  36.  END;
  37.  IOClipReqPtr= POINTER TO IOClipReq;
  38.  IOClipboard= IOClipReq;
  39.  IOClipboardPtr= IOClipReqPtr;
  40.  
  41. CONST
  42.  primaryClip= 0;    (* primary clip unit *)
  43.  
  44. TYPE
  45.  SatisfyMsg= RECORD
  46.   msg: ED.Message;       (* the length will be 6 *)
  47.   unit: CARDINAL;        (* which clip unit this is *)
  48.   clipID: LONGINT;        (* the clip identifier of the post *)
  49.  END;
  50.  SatisfyMsgPtr= POINTER TO SatisfyMsg;
  51.  
  52.  ClipHookMsg= RECORD
  53.   type: LONGCARD;        (* zero for this structure format *)
  54.   changeCmd: LONGINT;    (* command that caused this hook invocation: *)
  55.                      (*   either CMD_UPDATE or CBD_POST *)
  56.   clipID: LONGINT;      (* the clip identifier of the new data *)
  57.  END;
  58.  
  59. END Clipboard.