/trunk/Examples/test-suite/octave/li_std_string_extra_runme.m
MATLAB | 162 lines | 121 code | 41 blank | 0 comment | 30 complexity | e2bd7c88c28d152495c6ceb9536b875b MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- li_std_string_extra
- x="hello";
- if (li_std_string_extra.test_ccvalue(x) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_cvalue(x) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_value(x) != x)
- error("bad string mapping: %s, %s", x, li_std_string_extra.test_value(x))
- endif
- if (li_std_string_extra.test_const_reference(x) != x)
- error("bad string mapping")
- endif
- s = li_std_string_extra.string("he");
- #s += "ll"
- #s.append("ll")
- s = s + "llo";
- if (s != x)
- error("bad string mapping: %s, %s", s, x);
- endif
- #if (s(1:4) != x(1:4))
- # error("bad string mapping")
- #endif
- if (li_std_string_extra.test_value(s) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_const_reference(s) != x)
- error("bad string mapping")
- endif
- a = li_std_string_extra.A(s);
- if (li_std_string_extra.test_value(a) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_const_reference(a) != x)
- error("bad string mapping")
- endif
- b = li_std_string_extra.string(" world");
- s = a + b;
- if (a + b != "hello world")
- error("bad string mapping: %s", a + b)
- endif
-
- if (a + " world" != "hello world")
- error("bad string mapping")
- endif
- #if ("hello" + b != "hello world")
- # error("bad string mapping")
- #endif
- c = (li_std_string_extra.string("hello") + b);
- if (c.find_last_of("l") != 9)
- error("bad string mapping")
- endif
-
- s = "hello world";
- b = li_std_string_extra.B("hi");
- b.name = li_std_string_extra.string("hello");
- if (b.name != "hello")
- error("bad string mapping")
- endif
- b.a = li_std_string_extra.A("hello");
- if (b.a != "hello")
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_value_basic1(x) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_value_basic2(x) != x)
- error("bad string mapping")
- endif
- if (li_std_string_extra.test_value_basic3(x) != x)
- error("bad string mapping")
- endif
- # Global variables
- s = "initial string";
- if (li_std_string_extra.cvar.GlobalString2 != "global string 2")
- error("GlobalString2 test 1")
- endif
- li_std_string_extra.cvar.GlobalString2 = s;
- if (li_std_string_extra.cvar.GlobalString2 != s)
- error("GlobalString2 test 2")
- endif
- if (li_std_string_extra.cvar.ConstGlobalString != "const global string")
- error("ConstGlobalString test")
- endif
- # Member variables
- myStructure = li_std_string_extra.Structure();
- if (myStructure.MemberString2 != "member string 2")
- error("MemberString2 test 1")
- endif
- myStructure.MemberString2 = s;
- if (myStructure.MemberString2 != s)
- error("MemberString2 test 2")
- endif
- if (myStructure.ConstMemberString != "const member string")
- error("ConstMemberString test")
- endif
- if (li_std_string_extra.cvar.Structure_StaticMemberString2 != "static member string 2")
- error("StaticMemberString2 test 1")
- endif
- li_std_string_extra.cvar.Structure_StaticMemberString2 = s;
- if (li_std_string_extra.cvar.Structure_StaticMemberString2 != s)
- error("StaticMemberString2 test 2")
- endif
- if (li_std_string_extra.cvar.Structure_ConstStaticMemberString != "const static member string")
- error("ConstStaticMemberString test")
- endif
- if (li_std_string_extra.test_reference_input("hello") != "hello")
- error
- endif
- s = li_std_string_extra.test_reference_inout("hello");
- if (s != "hellohello")
- error
- endif
- if (li_std_string_extra.stdstring_empty() != "")
- error
- endif
- if (li_std_string_extra.c_empty() != "")
- error
- endif
- #if (li_std_string_extra.c_null() != None)
- # error
- #endif