Examples/test-suite/octave/namespace_typemap_runme.m

namespace_typemap

if (!strcmp(stest1("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest2("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest3("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest4("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest5("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest6("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest7("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest8("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest9("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest10("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest11("hello"),"hello"))
    error("failed");
endif

if (!strcmp(stest12("hello"),"hello"))
    error("failed");
endif

c = complex(2,3);
r = real(c);

if (ctest1(c) != r)
    error("failed");
endif

if (ctest2(c) != r)
    error("failed");
endif

if (ctest3(c) != r)
    error("failed");
endif

if (ctest4(c) != r)
    error("failed");
endif

if (ctest5(c) != r)
    error("failed");
endif

if (ctest6(c) != r)
    error("failed");
endif

if (ctest7(c) != r)
    error("failed");
endif

if (ctest8(c) != r)
    error("failed");
endif

if (ctest9(c) != r)
    error("failed");
endif

if (ctest10(c) != r)
    error("failed");
endif

if (ctest11(c) != r)
    error("failed");
endif

if (ctest12(c) != r)
    error("failed");
endif

try
    ttest1(-14)
    error("failed");
catch
end_try_catch