summaryrefslogtreecommitdiff
path: root/sci_gateway/cpp/sci_matrix_bkup.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'sci_gateway/cpp/sci_matrix_bkup.cpp')
-rw-r--r--sci_gateway/cpp/sci_matrix_bkup.cpp32
1 files changed, 0 insertions, 32 deletions
diff --git a/sci_gateway/cpp/sci_matrix_bkup.cpp b/sci_gateway/cpp/sci_matrix_bkup.cpp
deleted file mode 100644
index 071d330..0000000
--- a/sci_gateway/cpp/sci_matrix_bkup.cpp
+++ /dev/null
@@ -1,32 +0,0 @@
-extern "C"
-{
-#include<Scierror.h>
-#include<api_scilab.h>
-#include "localization.h"
-#include<fun.h>
-
-static const char fname[] = "octave_fun";
-
-int sci_octave_fun(scilabEnv env, int nin, scilabVar* in, int nopt, scilabOpt* opt, int nout, scilabVar* out)
-
-{
-
-if (nin != 0)
- {
- Scierror(77, _("%s: Wrong number of input argument(s): %d expected.\n"), fname, 2);
- return 1;
- }
-
-if (nout != 1)
- {
- Scierror(77, _("%s: Wrong number of output argument(s): %d expected.\n"), fname, 1);
- return 1;
- }
-
- double x = fun();
-
- out[0] = scilab_createDouble( env, x);
-
- return 0;
-}
-}