Mercurial > hg > octave-max

annotate examples/myfunc.c @ 14213:a022c04f68cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace to-be-deprecated strmatch occurrences with alternate code. * strread.m, textscan.m, pkg.m: Replace to-be-deprecated strmatch occurrences with alternate code.
author Rik <octave@nomad.inbox5.com>
date Wed, 18 Jan 2012 21:14:36 -0800
parents 6cb30a539481
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6580
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
1 #include "mex.h"
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
2
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
3 void
7081
503001863427 [project @ 2007-10-31 01:08:14 by jwe]
jwe
parents: 7019
diff changeset
4 mexFunction (int nlhs, mxArray *plhs[], int nrhs,
9932
6cb30a539481 untabify files in examples directory
John W. Eaton <jwe@octave.org>
parents: 9053
diff changeset
5 const mxArray *prhs[])
6580
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
6 {
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
7 const char *nm;
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
8 nm = mexFunctionName ();
6581
1a414f670635 [project @ 2007-04-25 22:34:52 by jwe]
jwe
parents: 6580
diff changeset
9 mexPrintf ("You called function: %s\n", nm);
6580
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
10 if (strcmp (nm, "myfunc") == 0)
6581
1a414f670635 [project @ 2007-04-25 22:34:52 by jwe]
jwe
parents: 6580
diff changeset
11 mexPrintf ("This is the principal function\n", nm);
6580
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
12 return;
d2bb3b8a8d20 [project @ 2007-04-25 22:19:03 by dbateman]
dbateman
parents:
diff changeset
13 }