netobjrt/src/ObjElem.i3


Copyright (C) 1994, Digital Equipment Corp.

INTERFACE ObjElem;

IMPORT NetObj, WeakRef;

CONST Brand = "ObjElem";

TYPE
  T = RECORD
    ref: NetObj.T := NIL;
    weakRef := WeakRef.T{ARRAY [0..7] OF BITS 8 FOR [0..255] {0, ..}};
    ready := FALSE; (* ready becomes TRUE when weakRef becomes valid *)
  END;

END ObjElem.