diff options
Diffstat (limited to 'Examples/test-suite/octave/overload_complicated_runme.m')
| -rwxr-xr-x | Examples/test-suite/octave/overload_complicated_runme.m | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/Examples/test-suite/octave/overload_complicated_runme.m b/Examples/test-suite/octave/overload_complicated_runme.m new file mode 100755 index 0000000..0313be9 --- /dev/null +++ b/Examples/test-suite/octave/overload_complicated_runme.m @@ -0,0 +1,58 @@ +overload_complicated + +pInt = None; + +# Check the correct constructors are available +p = Pop(pInt); + +p = Pop(pInt, 0); + +# Check overloaded in const only and pointers/references which target languages cannot disambiguate +if (p.hip(0) != 701) + error("Test 1 failed") +endif + +if (p.hip(pInt) != 702) + error("Test 2 failed") +endif + +# Reverse the order for the above +if (p.hop(pInt) != 805) + error("Test 3 failed") +endif + +if (p.hop(0) != 801) + error("Test 4 failed") +endif + +# Few more variations and order shuffled +if (p.pop(0) != 901) + error("Test 5 failed") +endif + +if (p.pop(pInt) != 902) + error("Test 6 failed") +endif + +if (p.pop() != 905) + error("Test 7 failed") +endif + +# Overload on const only +if (p.bop(pInt) != 1001) + error("Test 8 failed") +endif + +if (p.bip(pInt) != 2001) + error("Test 9 failed") +endif + +# Globals +if (muzak(0) != 3001) + error("Test 10 failed") +endif + +if (muzak(pInt) != 3002) + error("Test 11 failed") +endif + |
