NAME: Mark

     USE: This procedure records the current state of the heap into a
          specified pointer variable.  This value is normally used in
          conjunction with Release.

     DEPENDENCY:  None

     SYNTAX: Mark(Var PointerVar : Pointer);