Mercurial > octave-nkf
annotate examples/myfeval.c @ 16088:b29b10fbb744 stable release-3-6-4
Version 3.6.4 released.
* configure.ac (AC_INIT): Version is now 3.6.4.
(OCTAVE_RELEASE_DATE): Now 2013-02-21.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 21 Feb 2013 15:17:54 -0500 |
parents | 6cb30a539481 |
children | be41c30bcb44 |
rev | line source |
---|---|
5864 | 1 #include "mex.h" |
2 | |
3 void | |
7081 | 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[]) |
5864 | 6 { |
7 char *str; | |
8 | |
9 mexPrintf ("Hello, World!\n"); | |
10 | |
7081 | 11 mexPrintf ("I have %d inputs and %d outputs\n", nrhs, |
9932
6cb30a539481
untabify files in examples directory
John W. Eaton <jwe@octave.org>
parents:
9053
diff
changeset
|
12 nlhs); |
5864 | 13 |
14 if (nrhs < 1 || ! mxIsString (prhs[0])) | |
15 mexErrMsgTxt ("function name expected"); | |
16 | |
17 str = mxArrayToString (prhs[0]); | |
18 | |
7081 | 19 mexPrintf ("I'm going to call the function %s\n", str); |
5864 | 20 |
21 mexCallMATLAB (nlhs, plhs, nrhs-1, prhs+1, str); | |
22 | |
23 mxFree (str); | |
24 } |