BEGIN
SomeProc: PROC = {};
ThisProc: PUBLIC XMesaCmplr16DefsA.ProcRecord ← [SomeProc];
Begin AR 554
Reader: TYPE = POINTER;
FError:
PUBLIC
ERROR [msg: Reader ←
NIL, error:
ERROR ←
NIL,
errorData: POINTER TO UNSPECIFIED ← NIL] = CODE;
Signal:
PUBLIC
SIGNAL [msg: Reader ←
NIL, error:
ERROR ←
NIL,
errorData: POINTER TO UNSPECIFIED ← NIL] = CODE;
End AR 554
Error: PUBLIC ERROR [errorCode: XMesaCmplr16DefsA.ErrorCode] = CODE;
ThisProc[];
END.