+++ /dev/null
-/* Copyright (C) 2000 Free Software Foundation, Inc. */
-
-/* { dg-do run } */
-/* { dg-options "-trigraphs" } */
-
-/* Test lexing of numbers. */
-
-extern int puts (const char *);
-extern void abort (void);
-#define err(str) do { puts(str); abort(); } while (0)
-
-/* Escaped newlines. */
-#define foo 12\
-3\
-\
-4??/
-5
-
-#if foo != 12345
-#error foo
-#endif
-
-int main (int argc, char *argv[])
-{
- double a = 5.;
- double x = .5;
-
-/* Decimal points, including initially and immediately before and
- after an escaped newline. */
- if (a != 5)
- err ("a");
- if (x != .\
-5)
- err ("x != .5");
- x = 25\
-.\
-6;
- if (x != 25.6)
- err ("x != 25.6");
-
- /* Test exponentials and their signs. A buggy lexer is more likely
- to fail the compile, but never mind. */
- if (250 != 25e+1 || 250 != 25e1 || 250 != 2500e-1)
- err ("exponentials");
-
- /* Todo: p exponentials, and how to test preprocessing number
- tokenisation? */
-
- return 0;
-}