XMesaCmplr22:
MONITOR = {
c: CONDITION;
n: XMesaCmplr16DefsA.XAddress;
temp: XMesaCmplr16DefsA.XObject ← [variant: passive[rendezvous: c, process: NIL, active: n]];
passive: POINTER TO XMesaCmplr16DefsA.XObject ← @temp;
temp2: XMesaCmplr16DefsA.Object ← [remote: [addrLength: 0, vaddr: iso[5]], programNumber: 22, versionNumber: 1, zone: NIL, sH: NIL, classOfService: a];
cH: XMesaCmplr16DefsA.Handle ← @temp2;
WITH pH: passive
SELECT
FROM
passive => {
SELECT
TRUE
FROM
(pH.active.host #
LOOPHOLE[cH.remote,
spp XMesaCmplr16DefsA.Address].addr.host) =>
{};
ENDCASE;
};
ENDCASE;
}.