displayinput.cpp

cell_or_matrix 数据转换及数组格式标志使用

//
// MATLAB Compiler: 3.0
// Date: Sun May 23 22:49:07 2004
// 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" "-silentsetup" "-d"
// "D:/MATLAB6p5p1/work/book/dataconversion/cell_or_matrix/mfiles/src" "-v"
// "-B" "cppcom:testcellormatrix,testcellormatrix,1.0" "-B"
// "ccom:testcellormatrix,testcellormatrix,1.0" "-t" "-W"
// "com:testcellormatrix,testcellormatrix,1.0" "-T" "link:lib" "-h"
// "libmmfile.mlib" "-i" "-L" "cpp" "-g" "-G" "-A" "debugline:on" "-O" "none"
// "-O" "fold_scalar_mxarrays:off" "-O" "fold_non_scalar_mxarrays:off" "-O"
// "optimize_integer_for_loops:off" "-O" "array_indexing:off" "-O"
// "optimize_conditionals:off" "-O" "speculate:off" "-i"
// "D:/MATLAB6p5p1/work/book/dataconversion/cell_or_matrix/mfiles/displayinput.m
// " 
//
#include "displayinput.hpp"
#include "libmatlbm.hpp"

void InitializeModule_displayinput() {
}

void TerminateModule_displayinput() {
}

static void Mdisplayinput(mwArray x);

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

//
// The function "displayinput" contains the normal interface for the
// "displayinput" M-function from file
// "d:\matlab6p5p1\work\book\dataconversion\cell_or_matrix\mfiles\displayinput.m
// " (lines 1-10). This function processes any input arguments and passes them
// to the implementation version of the function, appearing above.
//
void displayinput(mwArray x) {
    Mdisplayinput(x);
}

//
// The function "mlxDisplayinput" contains the feval interface for the
// "displayinput" M-function from file
// "d:\matlab6p5p1\work\book\dataconversion\cell_or_matrix\mfiles\displayinput.m
// " (lines 1-10). The feval function calls the implementation version of
// displayinput through this function. This function processes any input
// arguments and passes them to the implementation version of the function,
// appearing above.
//
void mlxDisplayinput(int nlhs, mxArray * plhs[], int nrhs, mxArray * prhs[]) {
    MW_BEGIN_MLX();
    {
        mwArray mprhs[1];
        int i;
        if (nlhs > 0) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: displayinput Line: 1 Column:"
                  " 1 The function \"displayinput\" was called with m"
                  "ore than the declared number of outputs (0).")));
        }
        if (nrhs > 1) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: displayinput Line: 1 Column"
                  ": 1 The function \"displayinput\" was called with"
                  " more than the declared number of inputs (1).")));
        }
        for (i = 0; i < 1 && i < nrhs; ++i) {
            mprhs[i] = mwArray(prhs[i], 0);
        }
        for (; i < 1; ++i) {
            mprhs[i].MakeDIN();
        }
        Mdisplayinput(mprhs[0]);
    }
    MW_END_MLX();
}

//
// The function "Mdisplayinput" is the implementation version of the
// "displayinput" M-function from file
// "d:\matlab6p5p1\work\book\dataconversion\cell_or_matrix\mfiles\displayinput.m
// " (lines 1-10). 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 []=displayinput(x)
//
static void Mdisplayinput(mwArray x) {
    mclMlineEnterFunction(
      "d:\\matlab6p5p1\\work\\book\\dataconversio"
      "n\\cell_or_matrix\\mfiles\\displayinput.m",
      "displayinput")
    mwLocalFunctionTable save_local_function_table_
      = &_local_function_table_displayinput;
    mwArray ans = mwArray::UNDEFINED;
    //
    // %function []=displayinput(x)
    // if isa(x,'cell')
    //
    mclMline(3);
    if (tobool(isa(mwVa(x, "x"), "cell"))) {
        //
        // disp('The input data is a cell!');
        //
        mclMline(4);
        disp(mwArray("The input data is a cell!"));
        //
        // x
        //
        mclMline(5);
        mwVa(x, "x").Print("x");
    //
    // else
    //
    mclMline(6);
    } else {
        //
        // disp('The input data is a matrix!');
        //
        mclMline(7);
        disp(mwArray("The input data is a matrix!"));
        //
        // x
        //
        mclMline(8);
        mwVa(x, "x").Print("x");
    //
    // end
    //
    mclMline(9);
    }
    mclMlineExitFunction();
}