--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/extra/mex/myfeval.c	Wed Oct 10 19:54:49 2001 +0000
@@ -0,0 +1,14 @@
+#include "mex.h"
+
+void mexFunction(int nlhs, mxArray* plhs[], int nrhs, const mxArray* prhs[])
+{
+  char *str;
+  mexPrintf("Hello, World!\n");
+  mexPrintf("I have %d inputs and %d outputs\n", nrhs, nlhs);
+  if (nrhs < 1 || !mxIsString(prhs[0])) 
+    mexErrMsgTxt("function name expected");
+  str = mxArrayToString (prhs[0]);
+  mexPrintf("I'm going to call the interpreter function %s\n", str);
+  mexCallMATLAB(nlhs, plhs, nrhs-1, prhs+1, str);
+  mxFree(str);
+}