mirror of
https://github.com/gnustep/libs-base.git
synced 2025-04-28 19:20:51 +00:00
29 lines
749 B
Mathematica
29 lines
749 B
Mathematica
|
/*
|
||
|
|
copyright 2004 Alexander Malmberg <alexander@malmberg.org>
|
||
|
|
|
||
|
|
Tests that nul characters are handled correctly in strings and string
|
||
|
|
constants.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#import "Testing.h"
|
||
|
|
|
||
|
|
#import <Foundation/NSString.h>
|
||
|
|
|
||
|
|
int main(int argc, char **argv)
|
||
|
|
{
|
||
|
|
NSString *constantString=@"a\0b";
|
||
|
|
NSString *normalString;
|
||
|
|
unichar characters[3]={'a',0,'b'};
|
||
|
|
|
||
|
|
normalString = [[NSString alloc] initWithCharacters: characters length: 3];
|
||
|
|
|
||
|
|
PASS([constantString length] == 3, "nuls in constant strings");
|
||
|
|
PASS([normalString length] == 3, "nuls in non-constant strings");
|
||
|
|
PASS([constantString hash] == [normalString hash], "hashes match");
|
||
|
|
PASS([normalString isEqual: constantString]
|
||
|
|
&& [constantString isEqual: normalString], "compare as equal");
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|