summaryrefslogtreecommitdiff
path: root/Examples/test-suite/octave/callback_runme.m
diff options
context:
space:
mode:
Diffstat (limited to 'Examples/test-suite/octave/callback_runme.m')
-rw-r--r--Examples/test-suite/octave/callback_runme.m40
1 files changed, 40 insertions, 0 deletions
diff --git a/Examples/test-suite/octave/callback_runme.m b/Examples/test-suite/octave/callback_runme.m
new file mode 100644
index 0000000..db9f788
--- /dev/null
+++ b/Examples/test-suite/octave/callback_runme.m
@@ -0,0 +1,40 @@
+_callback
+callback
+
+if (foo(2) != 2)
+ error
+endif
+
+if (A_bar(2) != 4)
+ error
+endif
+
+if (foobar(3, _callback.foo) != foo(3))
+ error
+endif
+
+if (foobar(3, foo) != foo(3))
+ error
+endif
+
+if (foobar(3, A_bar) != A_bar(3))
+ error
+endif
+
+if (foobar(3, foof) != foof(3))
+ error
+endif
+
+if (foobar_i(3, foo_i) != foo_i(3))
+ error
+endif
+
+
+if (foobar_d(3.5, foo_d) != foo_d(3.5))
+ error
+endif
+
+a = A();
+if (foobarm(3, a, A.foom_cb_ptr) != a.foom(3))
+ error
+endif