www.gusucode.com > mbc 工具箱 matlab 源码程序 > mbc/@mbcreference/xregpointer.m

    function p = xregpointer(r)
%XREGPOINTER Update the dynamic reference copy of the object
%
%  P = XREGPOINTER(R) allocates a pointer for the reference object if one
%  has not been allocated yet or update the dynamic copy of the reference
%  object if it already exists.

%  Copyright 2004-2005 The MathWorks, Inc. and Ford Global Technologies, Inc.


if isnull(r.Pointer)
    p = xregpointer([]);
    r.Pointer = p;
else
    p = r.Pointer;
end
passign(p, r);