Mercurial > hg > octave-lyh
comparison examples/myfunc.c @ 6580:d2bb3b8a8d20
[project @ 2007-04-25 22:19:03 by dbateman]
author | dbateman |
---|---|
date | Wed, 25 Apr 2007 22:20:28 +0000 |
parents | |
children | 1a414f670635 |
comparison
equal
deleted
inserted
replaced
6579:f569cc721d3b | 6580:d2bb3b8a8d20 |
---|---|
1 #include "mex.h" | |
2 | |
3 void | |
4 mexFunction (int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[]) | |
5 { | |
6 const char *nm; | |
7 nm = mexFunctionName (); | |
8 mexPrintf("You called function: %s\n", nm); | |
9 if (strcmp (nm, "myfunc") == 0) | |
10 mexPrintf("This is the principal function\n", nm); | |
11 return; | |
12 } |