Initial commit

winx64/bin/swig-3.0.12/Examples/octave/constants/Makefile

@@ -0,0 +1,3 @@
+CXXSRCS =
+
+include $(SRCDIR)../example.mk

winx64/bin/swig-3.0.12/Examples/octave/constants/example.i

@@ -0,0 +1,27 @@
+/* File : example.i */
+%module swigexample
+
+%feature("autodoc", 1);
+
+/* A few preprocessor macros */
+
+#define    ICONST      42
+#define    FCONST      2.1828
+#define    CCONST      'x'
+#define    CCONST2     '\n'
+#define    SCONST      "Hello World"
+#define    SCONST2     "\"Hello World\""
+
+/* This should work just fine */
+#define    EXPR        ICONST + 3*(FCONST)
+
+/* This shouldn't do anything */
+#define    EXTERN      extern
+
+/* Neither should this (BAR isn't defined) */
+#define    FOO         (ICONST + BAR)
+
+/* The following directives also produce constants */
+
+%constant int iconst = 37;
+%constant double fconst = 3.14;

winx64/bin/swig-3.0.12/Examples/octave/constants/runme.m

@@ -0,0 +1,28 @@
+# do not dump Octave core
+if exist("crash_dumps_octave_core", "builtin")
+  crash_dumps_octave_core(0);
+endif
+
+swigexample
+
+printf("ICONST  = %i (should be 42)\n", swigexample.ICONST);
+printf("FCONST  = %f (should be 2.1828)\n", swigexample.FCONST);
+printf("CCONST  = %s (should be 'x')\n", swigexample.CCONST);
+printf("CCONST2 = %s (this should be on a new line)\n", swigexample.CCONST2);
+printf("SCONST  = %s (should be 'Hello World')\n", swigexample.SCONST);
+printf("SCONST2 = %s (should be '\"Hello World\"')\n", swigexample.SCONST2);
+printf("EXPR    = %f (should be 48.5484)\n", swigexample.EXPR);
+printf("iconst  = %i (should be 37)\n", swigexample.iconst);
+printf("fconst  = %f (should be 3.14)\n", swigexample.fconst);
+
+try
+    printf("EXTERN = %s (Arg! This shouldn't printf(anything)\n", swigexample.EXTERN);
+catch
+    printf("EXTERN isn't defined (good)\n");
+end_try_catch
+
+try
+    printf("FOO    = %i (Arg! This shouldn't printf(anything)\n", swigexample.FOO);
+catch
+    printf("FOO isn't defined (good)\n");
+end_try_catch