Last modified on Wed May 5 15:29:31 PDT 1993 by mjordan modified on Thu Apr 29 17:11:03 1993 by gnelson modified on Wed Sep 23 12:54:38 PDT 1992 by jdd
MODULE; IMPORT RTWeakRef; PROCEDURE WeakRef FromRef (r: REFANY; p: CleanUpProc := NIL): T = BEGIN RETURN RTWeakRef.WeakRefFromRef(r, p); END FromRef; PROCEDUREToRef (w: T): REFANY = BEGIN RETURN RTWeakRef.WeakRefToRef(w); END ToRef; BEGIN END WeakRef.