1 files changed, 24 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gcc.dg/c90-hexfloat-2.c b/gcc-4.9/gcc/testsuite/gcc.dg/c90-hexfloat-2.c
new file mode 100644
index 000000000..259471c8f
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gcc.dg/c90-hexfloat-2.c
@@ -0,0 +1,24 @@
+/* Test for hex floating point constants: in C99 only.  Preprocessor test.  */
+/* Origin: Joseph Myers <jsm28@cam.ac.uk> */
+/* { dg-do run } */
+/* { dg-options "-std=iso9899:1990 -pedantic-errors" } */
+
+#define f (
+#define l )
+#define str(x) #x
+#define xstr(x) str(x)
+
+/* C90: "0x1p+( 0x1p+)"; C99: "0x1p+f 0x1p+l" */
+const char *s = xstr(0x1p+f 0x1p+l);
+
+extern void abort (void);
+extern int strcmp (const char *, const char *);
+
+int
+main (void)
+{
+  if (strcmp (s, "0x1p+( 0x1p+)"))
+    abort ();
+  else
+    return 0; /* Correct C90 behavior.  */
+}