Initial commit of Octave module.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10290 626c5289-ae23-0410-ae9c-e8d60b6d4f22

Examples/test-suite/octave/overload_template_fast_runme.m

@@ -0,0 +1,188 @@
+overload_template_fast
+
+# unless explicitly casted via {{u}int{8,16,32,64},double,single},
+# octave will take numeric literals as doubles.
+
+f = foo();
+
+a = max(3,4);
+b = max(3.4,5.2);
+
+# mix 1
+if (mix1("hi") != 101)
+  error("mix1(const char*)")
+endif
+
+if (mix1(1.1, 1.1) != 102)
+  error("mix1(double, const double &)")
+endif
+
+if (mix1(1.1) != 103)
+  error("mix1(double)")
+endif
+
+# mix 2
+if (mix2("hi") != 101)
+  error("mix2(const char*)")
+endif
+
+if (mix2(1.1, 1.1) != 102)
+  error("mix2(double, const double &)")
+endif
+
+if (mix2(1.1) != 103)
+  error("mix2(double)")
+endif
+
+# mix 3
+if (mix3("hi") != 101)
+  error("mix3(const char*)")
+endif
+
+if (mix3(1.1, 1.1) != 102)
+  error("mix3(double, const double &)")
+endif
+
+if (mix3(1.1) != 103)
+  error("mix3(double)")
+endif
+
+# Combination 1
+if (overtparams1(100) != 10)
+  error("overtparams1(int)")
+endif
+
+if (overtparams1(100.1, 100) != 20)
+  error("overtparams1(double, int)")
+endif
+
+# Combination 2
+if (overtparams2(100.1, 100) != 40)
+  error("overtparams2(double, int)")
+endif
+
+# Combination 3
+if (overloaded() != 60)
+  error("overloaded()")
+endif
+
+if (overloaded(100.1, 100) != 70)
+  error("overloaded(double, int)")
+endif
+
+# Combination 4
+if (overloadedagain("hello") != 80)
+  error("overloadedagain(const char *)")
+endif
+
+if (overloadedagain() != 90)
+  error("overloadedagain(double)")
+endif
+
+# specializations
+if (specialization(10) != 202)
+  error("specialization(int)")
+endif
+
+if (specialization(10.1) != 203)
+  error("specialization(double)")
+endif
+
+if (specialization(10, 10) != 204)
+  error("specialization(int, int)")
+endif
+
+if (specialization(10.1, 10.1) != 205)
+  error("specialization(double, double)")
+endif
+
+if (specialization("hi", "hi") != 201)
+  error("specialization(const char *, const char *)")
+endif
+
+
+# simple specialization
+xyz();
+xyz_int();
+xyz_double();
+
+# a bit of everything
+if (overload("hi") != 0)
+  error("overload()")
+endif
+
+if (overload(1) != 10)
+  error("overload(int t)")
+endif
+
+if (overload(1, 1) != 20)
+  error("overload(int t, const int &)")
+endif
+
+if (overload(1, "hello") != 30)
+  error("overload(int t, const char *)")
+endif
+
+k = Klass();
+if (overload(k) != 10)
+  error("overload(Klass t)")
+endif
+
+if (overload(k, k) != 20)
+  error("overload(Klass t, const Klass &)")
+endif
+
+if (overload(k, "hello") != 30)
+  error("overload(Klass t, const char *)")
+endif
+
+if (overload(10.1, "hi") != 40)
+  error("overload(double t, const char *)")
+endif
+
+if (overload() != 50)
+  error("overload(const char *)")
+endif
+
+
+# everything put in a namespace
+if (nsoverload("hi") != 1000)
+  error("nsoverload()")
+endif
+
+if (nsoverload(1) != 1010)
+  error("nsoverload(int t)")
+endif
+
+if (nsoverload(1, 1) != 1020)
+  error("nsoverload(int t, const int &)")
+endif
+
+if (nsoverload(1, "hello") != 1030)
+  error("nsoverload(int t, const char *)")
+endif
+
+if (nsoverload(k) != 1010)
+  error("nsoverload(Klass t)")
+endif
+
+if (nsoverload(k, k) != 1020)
+  error("nsoverload(Klass t, const Klass &)")
+endif
+
+if (nsoverload(k, "hello") != 1030)
+  error("nsoverload(Klass t, const char *)")
+endif
+
+if (nsoverload(10.1, "hi") != 1040)
+  error("nsoverload(double t, const char *)")
+endif
+
+if (nsoverload() != 1050)
+  error("nsoverload(const char *)")
+endif
+
+
+A.foo(1);
+b = B();
+b.foo(1);