From 90d14f40a9c1d85bee827d94ce8f9bab8acb192c Mon Sep 17 00:00:00 2001 From: Manfred Hollstein Date: Fri, 18 Aug 2000 16:54:39 +0000 Subject: [PATCH] 20000818-1.c: New test. 2000-08-18 Manfred Hollstein * gcc.c-torture/execute/20000818-1.c: New test. From-SVN: r35788 --- gcc/testsuite/ChangeLog | 4 ++ .../gcc.c-torture/execute/20000818-1.c | 60 +++++++++++++++++++ 2 files changed, 64 insertions(+) create mode 100644 gcc/testsuite/gcc.c-torture/execute/20000818-1.c diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index b3edc99e3f0..70a342d1857 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2000-08-18 Manfred Hollstein + + * gcc.c-torture/execute/20000818-1.c: New test. + 2000-08-18 Joseph S. Myers * gcc.dg/format-va-1.c: New test. diff --git a/gcc/testsuite/gcc.c-torture/execute/20000818-1.c b/gcc/testsuite/gcc.c-torture/execute/20000818-1.c new file mode 100644 index 00000000000..0067644bddd --- /dev/null +++ b/gcc/testsuite/gcc.c-torture/execute/20000818-1.c @@ -0,0 +1,60 @@ +/* Copyright (C) 2000 Free Software Foundation. + + by Manfred Hollstein */ + +void *temporary_obstack; + +static int input (void); +static int ISALNUM (int ch); +static void obstack_1grow (void **ptr, int ch); + +int yylex (void); +int main (void); + +int main (void) +{ + int ch = yylex (); + + exit (0); +} + +int yylex (void) +{ + int ch; + +#ifndef WORK_AROUND + for (;;) + { + ch = input (); + if (ISALNUM (ch)) + obstack_1grow (&temporary_obstack, ch); + else if (ch != '_') + break; + } +#else + do + { + ch = input (); + if (ISALNUM (ch)) + obstack_1grow (&temporary_obstack, ch); + } while (ch == '_'); +#endif + + return ch; +} + +static int input (void) +{ + return 0; +} + +static int ISALNUM (int ch) +{ + return ((ch >= 'A' && ch <= 'Z') + || (ch >= 'a' && ch <= 'z') + || (ch >= '0' && ch <= '0')); +} + +static void obstack_1grow (void **ptr, int ch) +{ +}