The code isn't exercised under normal circumstances, but still.

2013-07-20  Eric Botcazou  <ebotca...@adacore.com>

        PR ada/57934
        * gcc-interface/ada.h (CAT): Fix typo.


-- 
Eric Botcazou
Index: gcc-interface/ada.h
===================================================================
--- gcc-interface/ada.h	(revision 201053)
+++ gcc-interface/ada.h	(working copy)
@@ -6,7 +6,7 @@
  *                                                                          *
  *                              C Header File                               *
  *                                                                          *
- *          Copyright (C) 1992-2009, Free Software Foundation, Inc.         *
+ *          Copyright (C) 1992-2013, Free Software Foundation, Inc.         *
  *                                                                          *
  * GNAT is free software;  you can  redistribute it  and/or modify it under *
  * terms of the  GNU General Public License as published  by the Free Soft- *
@@ -48,7 +48,7 @@
 #define CAT(A,B) A##B
 #else
 #define _ECHO(A) A
-#define CAT(A,B) ECHO(A)B
+#define CAT(A,B) _ECHO(A)B
 #endif
 
 /* The following macro definition simulates the effect of a declaration of

Reply via email to