view examples/mycell.c @ 18846:492c56149535 stable rc-3-8-2-1

3.8.2 release candidate 1 * configure.ac (OCTAVE_VERSION): Bump to 3.8.2-rc1. (OCTAVE_MINOR_VERSION): Bump to 2-rc1. (OCTAVE_RELEASE_DATE): Set to 2014-06-06.
author John W. Eaton <jwe@octave.org>
date Fri, 06 Jun 2014 11:43:17 -0400
parents 224e76250443
children
line wrap: on
line source

#include "mex.h"

void
mexFunction (int nlhs, mxArray* plhs[],
             int nrhs, const mxArray* prhs[])
{
  mwSize n;
  mwIndex i;

  if (nrhs != 1 || ! mxIsCell (prhs[0]))
    mexErrMsgTxt ("ARG1 must be a cell");

  n = mxGetNumberOfElements (prhs[0]);
  n = (n > nlhs ? nlhs : n);

  for (i = 0; i < n; i++)
    plhs[i] = mxDuplicateArray (mxGetCell (prhs[0], i));
}