Mercurial > octave-nkf
annotate examples/firstmexdemo.c @ 16033:23a7661e529a ss-3-7-2
snapshot version 3.7.2
* configure.ac (AC_INIT): Set version to 3.7.2.
(OCTAVE_RELEASE_DATE): Set to 2013-02-09.
(OCTAVE_COPYRIGHT): Update year.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sun, 10 Feb 2013 00:59:19 -0500 |
parents | 6cb30a539481 |
children |
rev | line source |
---|---|
6577 | 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[]) |
6577 | 6 { |
7 mxArray *v = mxCreateDoubleMatrix (1, 1, mxREAL); | |
8 double *data = mxGetPr (v); | |
9 *data = 1.23456789; | |
10 plhs[0] = v; | |
11 } |