CirioNubPrivate.mesa
Copyright Ó 1989 by Xerox Corporation. All rights reserved.
Demers, September 19, 1989 5:18:10 pm PDT
DIRECTORY
PBasics,
CirioNub
;
CirioNubPrivate: CEDAR DEFINITIONS ~ {
Types on the Wire
Wrapper: TYPE ~ --WORD16-- MACHINE DEPENDENT RECORD [
tag: PBasics.HWORD,
len: PBasics.HWORD
];
Tag: TYPE ~ MACHINE DEPENDENT {
null (0), -- not used!
procID(1), -- len = 4, val = CirioNub.ProcID[...]
retCode(2), -- len = 4, val = CARD32[CirioNub.ReturnCode[...]]
card32(3), -- len = 4, val = CARD32
int32(4), -- len = 4, val = INT32
string(5), -- len = n, val = n CHARs
block8(6), -- len = n, val = n arbitrary BYTEs
block16(7), -- len = 2*n, val = n arbitrary CARD16s
block32(8), -- len = 4*n, val = n arbitrary CARD32s
last(CARD16.LAST)
};
}.