diff options
Diffstat (limited to 'Examples/test-suite/perl5/li_std_string_runme.pl')
-rw-r--r-- | Examples/test-suite/perl5/li_std_string_runme.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Examples/test-suite/perl5/li_std_string_runme.pl b/Examples/test-suite/perl5/li_std_string_runme.pl index 3c3f9d5b4..0eb0b1476 100644 --- a/Examples/test-suite/perl5/li_std_string_runme.pl +++ b/Examples/test-suite/perl5/li_std_string_runme.pl @@ -101,14 +101,14 @@ is($gen1->testl("9234567890121111113"), "9234567890121111114", "ulonglong big nu is(li_std_string::stdstring_empty(), "", "stdstring_empty"); -is(li_std_string::c_empty(), "", "c_empty"); +is(li_std_string::c_empty(), "", "c_empty"); -is(li_std_string::c_null(), undef, "c_empty"); +is(li_std_string::c_null(), undef, "c_null"); -is(li_std_string::get_null(li_std_string::c_null()), undef, "c_empty"); +is(li_std_string::get_null(li_std_string::c_null()), undef, "get_null c_null"); -is(li_std_string::get_null(li_std_string::c_empty()), "non-null", "c_empty"); +is(li_std_string::get_null(li_std_string::c_empty()), "non-null", "get_null c_empty"); -is(li_std_string::get_null(li_std_string::stdstring_empty()), "non-null", "stdstring_empty"); +is(li_std_string::get_null(li_std_string::stdstring_empty()), "non-null", "get_null stdstring_empty"); |