Few fixes in support units.
[brdnet.git] / opcode.pas
blob4fd84873364a76780cb54261d5dd73c86680728e
1 UNIT opcode;
2 INTERFACE
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 {s}upGET=1;
15 {r}upINFO=2;
16 {r}upFAIL=3;
17 {r}upDONE=4;
18 {s}upSEG=5;
19 {r}upSEGOK=6;
20 {s}upFIN=7;
21 upErrMalformed=1;
22 upErrHiChan=2;
23 upErrChanInUse=3;
24 upErrNotFound=4;
25 upErrIO=5;
26 upErrSegNoGet=6;
28 IMPLEMENTATION
29 END.