getdata.c

MATLAB-C混合编程

/*
 * MATLAB Compiler: 3.0
 * Date: Fri Jun 22 08:45:52 2001
 * Arguments: "-B" "macro_default" "-O" "all" "-O" "fold_scalar_mxarrays:on"
 * "-O" "fold_non_scalar_mxarrays:on" "-O" "optimize_integer_for_loops:on" "-O"
 * "array_indexing:on" "-O" "optimize_conditionals:on" "-m" "-W" "main" "-L"
 * "C" "-t" "-T" "link:exe" "-h" "libmmfile.mlib" "-c" "-B" "sgl" "-m" "-W"
 * "main" "-L" "C" "-t" "-T" "link:exe" "-h" "libmmfile.mlib" "-W" "mainhg"
 * "libmwsglm.mlib" "showdata.m" "getdata.m" 
 */
#include "getdata.h"
#include "libmatlbm.h"
#include "getdata_external.h"
static mxArray * _persistent_getdata__t;

void InitializeModule_getdata(void) {
    mclInitializePersistent(&_persistent_getdata__t);
}

void TerminateModule_getdata(void) {
    mxDestroyArray(_persistent_getdata__t);
}

_mexLocalFunctionTable _local_function_table_getdata
  = { 0, (mexFunctionTableEntry *)NULL };

/*
 * The function "mlfGetdata" contains the normal interface for the "getdata"
 * M-function from file "c:\matlab6p5\matlab c project\code\matlab编译器\c_m\no
 * persistent\getdata.m" (lines 1-10). This function processes any input
 * arguments and passes them to the implementation version of the function,
 * appearing above.
 */
mxArray * mlfGetdata(void) {
    int nargout = 1;
    mxArray * y = NULL;
    mlfEnterNewContext(0, 0);
    y = Mgetdata(nargout);
    mlfRestorePreviousContext(0, 0);
    return mlfReturnValue(y);
}

/*
 * The function "mlxGetdata" contains the feval interface for the "getdata"
 * M-function from file "c:\matlab6p5\matlab c project\code\matlab编译器\c_m\no
 * persistent\getdata.m" (lines 1-10). The feval function calls the
 * implementation version of getdata through this function. This function
 * processes any input arguments and passes them to the implementation version
 * of the function, appearing above.
 */
void mlxGetdata(int nlhs, mxArray * plhs[], int nrhs, mxArray * prhs[]) {
    mxArray * mplhs[1];
    int i;
    if (nlhs > 1) {
        mlfError(
          mxCreateString(
            "Run-time Error: File: getdata Line: 1 Column: "
            "1 The function \"getdata\" was called with mor"
            "e than the declared number of outputs (1)."),
          NULL);
    }
    if (nrhs > 0) {
        mlfError(
          mxCreateString(
            "Run-time Error: File: getdata Line: 1 Column:"
            " 1 The function \"getdata\" was called with m"
            "ore than the declared number of inputs (0)."),
          NULL);
    }
    for (i = 0; i < 1; ++i) {
        mplhs[i] = NULL;
    }
    mlfEnterNewContext(0, 0);
    mplhs[0] = Mgetdata(nlhs);
    mlfRestorePreviousContext(0, 0);
    plhs[0] = mplhs[0];
}