Sophie

Sophie

distrib > Fedora > 18 > i386 > by-pkgid > 7be3a0df92996a55ea4a48648c87895b > files > 45

octave-doc-3.6.4-1.fc18.noarch.rpm

#include "mex.h"

void
mexFunction (int nlhs, mxArray *plhs[], int nrhs, 
             const mxArray *prhs[])
{
  const char *nm;
  nm = mexFunctionName ();
  mexPrintf ("You called function: %s\n", nm);
  if (strcmp (nm, "myfunc") == 0)
    mexPrintf ("This is the principal function\n", nm);
  return; 
}