File: mutablestring.m

package info (click to toggle)
gnustep-corebase 0.1.1%2B20230710-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,608 kB
  • sloc: ansic: 25,359; objc: 4,347; cpp: 75; xml: 49; makefile: 24; sh: 7
file content (52 lines) | stat: -rw-r--r-- 1,637 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
#include "CoreFoundation/CFString.h"
#include "../CFTesting.h"

int main (void)
{
  CFMutableStringRef str1;
  CFMutableStringRef str2;
  CFStringRef constant1 = CFSTR("Test string.");
  CFStringRef constant2 = CFSTR("   test  ");
  
  str1 = CFStringCreateMutable (NULL, 0);
  CFStringReplaceAll (str1, constant1);
  PASS_CFEQ(str1, constant1, "String is replaced correctly.");
  
  str2 = CFStringCreateMutableCopy (NULL, CFStringGetLength(str1), str1);
  
  CFStringUppercase (str2, NULL);
  PASS_CFEQ(str2, CFSTR("TEST STRING."), "Uppercase mapping works.");
  
  CFStringCapitalize (str2, NULL);
  PASS_CFEQ(str2, CFSTR("Test String."), "Capitalize mapping works.");
  
  CFStringLowercase (str2, NULL);
  PASS_CFEQ(str2, CFSTR("test string."), "Lowercase mapping works");
  
  CFStringReplace (str2, CFRangeMake(0, CFStringGetLength(str1)), constant1);
  PASS_CFEQ(str2, constant1, "String is replaced whole.");
  
  CFRelease(str1);
  CFRelease(str2);
  
  str1 = CFStringCreateMutable (NULL, 0);
  CFStringReplaceAll (str1, constant2);
  CFStringTrimWhitespace (str1);
  PASS_CFEQ(str1, CFSTR("test"), "String is trimmed correctly.");
  
  CFStringReplace (str1, CFRangeMake(1, 2), constant1);
  PASS_CFEQ(str1, CFSTR("tTest string.t"), "String replacement works");
  
  CFRelease (str1);
  
  str1 = CFStringCreateMutable (NULL, 0);
  CFStringReplaceAll (str1, CFSTR("abcdef"));
  constant1 = CFSTR("123");
  CFStringPad (str1, constant1, 9, 1);
  PASS_CFEQ(str1, CFSTR("abcdef231"), "Padding works.");
  CFStringPad (str1, NULL, 3, 0);
  PASS_CFEQ(str1, CFSTR("abc"), "Truncating works.");
  CFRelease (str1);
  
  return 0;
}