jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more fixes/tests for empty strings

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9083 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2006-05-04 04:45:41 +00:00
commit 20339de8b4
6 changed files with 80 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

26
Examples/test-suite/perl5/li_std_string_runme.pl
View file

@ -118,3 +118,29 @@ if ($gen1->testl(9234567890121111113) ne 9234567890121111114) {
die ("ulonglong");
}
if (li_std_string::empty() ne "") {
die ("empty");
}
if (li_std_string::c_empty() ne "") {
die ("c_empty");
}
if (li_std_string::c_null() ne undef) {
die ("c_empty");
}
if (li_std_string::get_null(li_std_string::c_null()) ne undef) {
die ("c_empty");
}
if (li_std_string::get_null(li_std_string::c_empty()) ne "non-null") {
die ("c_empty");
}
if (li_std_string::get_null(li_std_string::empty()) ne "non-null") {
die ("c_empty");
}