INTERFACE ObFrame_OpCodeHandle_v1;
IMPORT Fingerprint, Rd, Wr, StubLib, ObLib, ObFrame, Thread, NetObj;
TYPE Surrogate_ObFrame_OpCodeHandle = ObFrame.OpCodeHandle OBJECT
OVERRIDES
getOpCodes := Surrogate_getOpCodes;
END;
PROCEDURE Surrogate_getOpCodes(
self: ObFrame.OpCodeHandle;
ts: Fingerprint.T): REF ObLib.OpCodes RAISES {NetObj.Error,
Thread.Alerted};
PROCEDURE Stub_getOpCodes(
self: ObFrame.OpCodeHandle;
c: StubLib.Conn;
rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
Thread.Alerted};
END ObFrame_OpCodeHandle_v1.