opcode.pas

   1 UNIT opcode;
   2 INTERFACE
   3
   4 const {dgram opcode}
   5  tcdata=4;
   6  tcdataimm=6;
   7  tccont=5;
   8  tceack=7;
   9  tcdata_no_report=8 unimplemented;
  10 const {chat init}
  11  upFileServer=2;
  12 const {FS opcodes}
  13  upClose=0;
  14  upGET=1;
  15  upINFO=2;
  16  upFAIL=3;
  17  upDONE=4;
  18  upSEG=5;
  19  upSEGOK=6;
  20  upFIN=7;
  21
  22 IMPLEMENTATION
  23 END.