gcc/testsuite/objc.dg/torture/strings/const-cfstring-1.m

   1 /* Test the -fconstant-cfstrings option for constructing
   2    compile-time immutable CFStrings, and their interoperation
   3    with both Cocoa and CoreFoundation.  This will only work
   4    on MacOS X 10.1.2 and later.  */
   5 /* Developed by Ziemowit Laski <zlaski@apple.com>.  */
   6
   7 /* So far, CFString is darwin-only.  */
   8 /* { dg-do run { target *-*-darwin* } } */
   9 /* { dg-skip-if "NeXT only" { *-*-* } { "-fgnu-runtime" } { "" } } */
  10 /* { dg-xfail-run-if "Needs OBJC2 ABI" { *-*-darwin* && { lp64 && { ! objc2 } } } { "-fnext-runtime" } { "" } } */
  11 /* { dg-options "-mconstant-cfstrings -framework Cocoa" } */
  12
  13 #import <Foundation/NSString.h>
  14 #import <CoreFoundation/CFString.h>
  15 #include <stdlib.h>
  16
  17 void printOut(NSString *str) {
  18   NSLog(@"The value of str is: %@", str);
  19 }
  20
  21 CFStringRef s0a = CFSTR("Compile-time string literal");
  22 CFStringRef s0b = CFSTR("Compile-time string literal");
  23
  24 void checkNSRange(NSRange r) {
  25   if (r.location != 6 || r.length != 5) {
  26     printOut(@"Range check failed");
  27     abort();
  28   }
  29 }
  30
  31 void checkCFRange(CFRange r) {
  32   if (r.location != 6 || r.length != 5) {
  33     printOut(@"Range check failed");
  34     abort();
  35   }
  36 }
  37
  38 int main(void) {
  39   const NSString *s1 = @"Compile-time string literal";
  40   CFStringRef s2 = CFSTR("Compile-time string literal");
  41
  42   checkNSRange([@"Hello World" rangeOfString:@"World"]);
  43   checkNSRange([(id)CFSTR("Hello World") rangeOfString:@"World"]);
  44   checkNSRange([@"Hello World" rangeOfString:(id)CFSTR("World")]);
  45   checkNSRange([(id)CFSTR("Hello World") rangeOfString:(id)CFSTR("World")]);
  46
  47   checkCFRange(CFStringFind((CFStringRef)@"Hello World", (CFStringRef)@"World", 0));
  48   checkCFRange(CFStringFind(CFSTR("Hello World"), (CFStringRef)@"World", 0));
  49   checkCFRange(CFStringFind((CFStringRef)@"Hello World", CFSTR("World"), 0));
  50   checkCFRange(CFStringFind(CFSTR("Hello World"), CFSTR("World"), 0));
  51
  52   /* Check for string uniquing.  */
  53   if (s0a != s0b || s0a != s2 || s1 != (id)s2) {
  54     NSLog(@"String uniquing failed");
  55     abort ();
  56   }
  57
  58   return 0;
  59 }