guidata.c

精通Matlab与C_C++混合程序设计.rar 是精通Matlab与C_C++混合程序设计 这本书的配套源码

    mclMline(87);
    #line 87 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    }
    /*
     * if isempty(fig)
     */
    #line 88 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(88);
    #line 88 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    if (mlfTobool(mlfIsempty(mclVv(fig, "fig")))) {
        /*
         * error('H must be the handle to a figure or figure descendent.');
         */
        #line 89 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mclMline(89);
        #line 89 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mlfError(mxCreateString("H must be the handle to a figure or figure descendent."), NULL);
    /*
     * end
     */
    #line 90 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(90);
    #line 90 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    }
    /*
     * 
     * if nargin == 1 % GET
     */
    #line 92 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(92);
    #line 92 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    if (nargin_ == 1) {
        /*
         * data = getappdata(fig, PROP_NAME);
         */
        #line 93 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mclMline(93);
        #line 93 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mlfAssign(&data, mlfGetappdata(mclVv(fig, "fig"), mclVv(PROP_NAME, "PROP_NAME")));
    /*
     * else % (nargin == 2) SET
     */
    #line 94 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(94);
    #line 94 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    } else {
        /*
         * setappdata(fig, PROP_NAME, data_in);
         */
        #line 95 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mclMline(95);
        #line 95 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mlfSetappdata(mclVv(fig, "fig"), mclVv(PROP_NAME, "PROP_NAME"), mclVa(data_in, "data_in"), NULL);
    /*
     * end
     */
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(96);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    }
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclValidateOutput(data, 1, nargout_, "data", "guidata");
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxDestroyArray(PROP_NAME);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxDestroyArray(ans);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxDestroyArray(fig);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxDestroyArray(data_in);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxDestroyArray(h);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclSetCurrentLocalFunctionTable(save_local_function_table_);
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMlineFunctionReturn()
    #line 96 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    return data;
    /*
     * 
     * 
     */
    #line 98 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMlineExitFunctionReturn();
    #line 98 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
}

/*
 * The function "Mguidata_getParentFigure" is the implementation version of the "guidata/getParentFigure" M-function from file "d:\matlab6p5\toolbox\matlab\uitools\guidata.m" (lines 99-105). It contains the actual compiled code for that M-function. It is a static function and must only be called from one of the interface functions, appearing below.
 */
/*
 * function fig = getParentFigure(fig)
 */
#line 99 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
static mxArray * Mguidata_getParentFigure(int nargout_, mxArray * fig_in) {
    #line 99 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMlineEnterFunction("d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m", "guidata/getParentFigure")
    #line 99 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mexLocalFunctionTable save_local_function_table_ = mclSetCurrentLocalFunctionTable(&_local_function_table_guidata);
    #line 99 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mxArray * fig = NULL;
    #line 99 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclCopyInputArg(&fig, fig_in);
    /*
     * % if the object is a figure or figure descendent, return the
     * % figure.  Otherwise return [].
     * while ~isempty(fig) & ~strcmp('figure', get(fig,'type'))
     */
    #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(102);
    #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    for (;;) {
        #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mxArray * a_ = mclInitialize(mclNot(mlfIsempty(mclVa(fig, "fig"))));
        #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        if (mlfTobool(a_) && mlfTobool(mclAnd(a_, mclNot(mlfStrcmp(mxCreateString("figure"), mlfNGet(1, mclVa(fig, "fig"), mxCreateString("type"), NULL)))))) {
            #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
            mxDestroyArray(a_);
        #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        } else {
            #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
            mxDestroyArray(a_);
            #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
            break;
        #line 102 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        }
        /*
         * fig = get(fig,'parent');
         */
        #line 103 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mclMline(103);
        #line 103 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
        mlfAssign(&fig, mlfNGet(1, mclVa(fig, "fig"), mxCreateString("parent"), NULL));
    /*
     * end
     */
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMline(104);
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    }
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclValidateOutput(fig, 1, nargout_, "fig", "guidata/getParentFigure");
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclSetCurrentLocalFunctionTable(save_local_function_table_);
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMlineFunctionReturn()
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    return fig;
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
    mclMlineExitFunctionReturn();
    #line 104 "d:\\matlab6p5\\toolbox\\matlab\\uitools\\guidata.m"
}