IntelHex: CEDAR DEFINITIONS = BEGIN EndOfProc: TYPE = PROC RETURNS [BOOLEAN]; GetByteProc: TYPE = PROC RETURNS [CARDINAL]; GetPositionProc: TYPE = PROC RETURNS [INT]; SetPositionProc: TYPE = PROC [p: INT]; IStream: TYPE = RECORD [ endof: EndOfProc, get: GetByteProc, GetPosition: GetPositionProc, SetPosition: SetPositionProc ]; PutEndRecordProc: TYPE = PROC; PutStartRecordProc: TYPE = PROC [frame, bytepos: CARDINAL]; DataByteProc: TYPE = PROC [adr: LONG CARDINAL, d: CARDINAL]; OStream: TYPE = RECORD [ PutEndRecord: PutEndRecordProc, PutStartRecord: PutStartRecordProc, DataByte: DataByteProc ]; PutCharProc: TYPE = PROC [c: CHARACTER]; ProcessFile: PROC [in: IStream, out: OStream, errs: PutCharProc] RETURNS [success: BOOLEAN]; END. 1-Jan-82 19:43:25, L. Stewart, created April 25, 1983 3:35 pm, LCS, CEDAR & Tioga DIntelHex.mesa Last Modified: Stewart, April 25, 1983 3:35 pm Ęz˜Jšœ ™ Jšœ/™/J˜Jšœ Īkœ˜Jš˜˜Jš Īn œœœœœ˜)Jš ž œœœœœ˜,Jš žœœœœœ˜+Jšžœœœœ˜&J˜šœ œœ˜J˜J˜J˜J˜J˜J˜—Jšžœœœ˜Jšžœœœœ˜;Jš ž œœœœœœ˜