Mercurial > hg > octave-nkf

diff examples/myhello.c @ 5864:e884ab4f29ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-06-22 00:57:27 by jwe]
author jwe
date Thu, 22 Jun 2006 00:57:28 +0000
parents
children 4270ded9ddc6
line wrap: on
line diff
new file mode 100644
--- /dev/null
+++ b/examples/myhello.c
@@ -0,0 +1,13 @@
+#include "mex.h"
+
+void
+mexFunction (int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
+{
+  mxArray *v = mxCreateDoubleMatrix (1, 1, mxREAL);
+
+  double *data = mxGetPr (v);
+
+  *data = 1.23456789;
+
+  plhs[0] = v;
+}