Copyright (C) 1994, Digital Equipment Corp.
<*PRAGMA LL*>
INTERFACE MiscDetail;
A VBT.MiscRec contains a detail field consisting of two integers. It is
sometimes useful to be able to associate arbitrary data with these
integers. This interface provides a simple mechanism to encode a
REFANY as an INTEGER, thus suitable for passing in one field of a
MiscDetail. In typical use, the client should call ToRef immediately
upon receipt of the MiscRec, since the sender will usually disable
conversion when the call returns.
PROCEDURE FromRef(ra: REFANY): INTEGER;
Return a value i such that ToRef(i) returns ra. -1 always
represents NIL.
PROCEDURE ToRef(i: INTEGER): REFANY;
If i does not reference anything, return NIL.
PROCEDURE Delete(i: INTEGER);
Cause ToRef(i) to return NIL.
END MiscDetail.