X-Git-Url: https://oss.titaniummirror.com/gitweb?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fgcc.dg%2Fcpp%2Fucs.c;fp=gcc%2Ftestsuite%2Fgcc.dg%2Fcpp%2Fucs.c;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=1dfe444d0c116c45d37bc201a103fa6456223f66;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/gcc.dg/cpp/ucs.c b/gcc/testsuite/gcc.dg/cpp/ucs.c deleted file mode 100644 index 1dfe444d..00000000 --- a/gcc/testsuite/gcc.dg/cpp/ucs.c +++ /dev/null @@ -1,67 +0,0 @@ -/* Copyright (C) 2001 Free Software Foundation, Inc. */ - -/* { dg-do compile } */ -/* { dg-options "-std=c99" } */ - -/* This tests universal character sequences. - - Neil Booth, 22 May 2001. - Richard Henderson, 3 Apr 2002. */ - -#include - -#define unsigned +0 -#define int +0 -#define char +1 -#define short +2 -#define long +3 - -#if __WCHAR_TYPE__ == 0 -# define WCHAR_MAX INT_MAX -#elif __WCHAR_TYPE__ == 1 -# define WCHAR_MAX CHAR_MAX -#elif __WCHAR_TYPE__ == 2 -# define WCHAR_MAX SHRT_MAX -#elif __WCHAR_TYPE__ == 3 -# define WCHAR_MAX LONG_MAX -#else -# error wacky wchar_t -#endif - -#undef unsigned -#undef int -#undef char -#undef short -#undef long - -#if L'\u1234' != 0x1234 -#error bad short ucs /* { dg-bogus "bad" "bad \u1234 evaluation" } */ -#endif - -#if WCHAR_MAX >= 0x7ffffff -# if L'\U1234abcd' != 0x1234abcd -# error bad long ucs /* { dg-bogus "bad" "bad \U1234abcd evaluation" } */ -# endif -#endif - -void foo () -{ - int c; - - c = L'\ubad'; /* { dg-error "incomplete" "incompete UCN 1" } */ - c = L"\U1234"[0]; /* { dg-error "incomplete" "incompete UCN 2" } */ - - c = L'\u000x'; /* { dg-error "non-hex" "non-hex digit in UCN" } */ - /* If sizeof(HOST_WIDE_INT) > sizeof(wchar_t), we can get a multi-character - constant warning even for wide characters. */ - /* { dg-warning "too long|multi-character" "" { target *-*-* } 54 } */ - - c = '\u0024'; /* { dg-bogus "invalid" "0024 is a valid UCN" } */ - c = "\u0040"[0]; /* { dg-bogus "invalid" "0040 is a valid UCN" } */ - c = '\u00a0'; /* { dg-bogus "invalid" "00a0 is a valid UCN" } */ - c = '\U00000060'; /* { dg-bogus "invalid" "0060 is a valid UCN" } */ - - c = '\u0025'; /* { dg-error "range" "0025 is an invalid UCN" } */ - c = L"\uD800"[0]; /* { dg-error "range" "D800 is an invalid UCN" } */ - c = L'\U0000DFFF'; /* { dg-error "range" "DFFF is an invalid UCN" } */ -}