Examples/test-suite/octave/overload_null_runme.m

# do not dump Octave core
if exist("crash_dumps_octave_core", "builtin")
  crash_dumps_octave_core(0);
endif

overload_null

function check(a, b)
  if (a != b)
    error("%i does not equal %i", a, b);
  endif
end

o = Overload();
x = X();
null = []; # NULL pointer

check(1, o.byval1(x));
check(2, o.byval1(null));

check(3, o.byval2(null));
check(4, o.byval2(x));

check(5, o.byref1(x));
check(6, o.byref1(null));

check(7, o.byref2(null));
check(8, o.byref2(x));

check(9, o.byconstref1(x));
check(10, o.byconstref1(null));

check(11, o.byconstref2(null));
check(12, o.byconstref2(x));

# const pointer references
check(13, o.byval1cpr(x));
check(14, o.byval1cpr(null));

check(15, o.byval2cpr(null));
check(16, o.byval2cpr(x));

# fwd class declaration
check(17, o.byval1fwdptr(x));
check(18, o.byval1fwdptr(null));

check(19, o.byval2fwdptr(null));
check(20, o.byval2fwdptr(x));

check(21, o.byval1fwdref(x));

check(22, o.byval2fwdref(x));