X-Git-Url: https://oss.titaniummirror.com/gitweb/?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fgcc.dg%2Fcpp%2Flexstrng.c;fp=gcc%2Ftestsuite%2Fgcc.dg%2Fcpp%2Flexstrng.c;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=b0353300395f3ae39b33924f3cdf2427bfad1d63;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/gcc.dg/cpp/lexstrng.c b/gcc/testsuite/gcc.dg/cpp/lexstrng.c deleted file mode 100644 index b0353300..00000000 --- a/gcc/testsuite/gcc.dg/cpp/lexstrng.c +++ /dev/null @@ -1,67 +0,0 @@ -/* Copyright (C) 2000 Free Software Foundation, Inc. */ - -/* { dg-do run } */ -/* { dg-options "-trigraphs" } */ - -/* Test lexing of strings and character constants. */ - -#ifndef __WCHAR_TYPE__ -#define __WCHAR_TYPE__ int -#endif -typedef __WCHAR_TYPE__ wchar_t; - -extern int strcmp (const char *, const char *); -extern int puts (const char *); -extern void abort (void); -#define err(str) do { puts(str); abort(); } while (0) - -/* Escaped newlines. */ -const char *str1 = "s\ -t\ -\ -r??/ - 1"; - -const char x = '\ -??/ -b'; - -/* Test escaped terminators. */ -const char *term = "\"\\\"\\"; -const char termc = '\''; -const char *terms = "'"; - -/* Test wide strings and chars are lexed. */ -const wchar_t wchar = L'w'; -const wchar_t* wstring = L"wide string"; - -/* Test all 9 trigraphs embedded in a string. Test trigraphs do not - survive an embedded backslash newline. Test trigraphs preceded by - a '?' are still noticed. */ -const char *t = "??/\????=??)??\ -(??(??!??'??-???=???/ -?-"; - -int main (int argc, char *argv[]) -{ - if (strcmp (str1, "str 1")) - err ("str1"); - - if (x != 'b') - err ("b"); - - /* We have to split the string up to avoid trigraph replacement - here. Split the 2 trigraphs after both 1 and 2 ?s; just doing - this exposed a bug in the initial release of the tokenized lexer. */ - if (strcmp (t, "\\{}#]?" "?([|^~?#??" "-")) - err ("Embedded trigraphs"); - - if (term[0] != '"' || term[1] != '\\' || term[2] != '"' - || term[3] != '\\' || term[4] != '\0') - err ("Escaped string terminators"); - - if (termc != terms[0]) - err ("Escaped character constant terminator"); - - return 0; -}