1 /* This test file is part of GDB, the GNU debugger.
3 Copyright 1995, 1999, 2003, 2004 Free Software Foundation, Inc.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 /* This file is exactly like compiler.c. I could just use compiler.c if
22 I could be sure that every C++ compiler accepted extensions of ".c". */
24 /* Note the semicolon at the end of this line. Older versions of
25 hp c++ have a bug in string preprocessing: if the last token on a
26 line is a string, then the preprocessor concatenates the next line
27 onto the current line and eats the newline! That messes up TCL of
28 course. That happens with HP aC++ A.03.13, but it no longer happens
29 with HP aC++ A.03.45. */
31 set compiler_info
"unknown" ;
33 #if defined (__GNUC__)
34 #if defined (__GNUC_PATCHLEVEL__)
35 /* Only GCC versions >= 3.0 define the __GNUC_PATCHLEVEL__ macro. */
36 set compiler_info
[join
{gcc __GNUC__ __GNUC_MINOR__ __GNUC_PATCHLEVEL__
} -]
38 set compiler_info
[join
{gcc __GNUC__ __GNUC_MINOR__
"unknown"} -]
42 #if defined (__HP_CXD_SPP)
43 /* older hp ansi c, such as A.11.01.25171.gp, defines this */
44 set compiler_info
[join
{hpcc __HP_CXD_SPP
} -]
48 /* newer hp ansi c, such as B.11.11.28706.gp, defines this */
49 set compiler_info
[join
{hpcc __HP_cc
} -]
52 #if defined (__HP_aCC)
53 set compiler_info
[join
{hpacc __HP_aCC
} -]
57 /* IBM'x xlc compiler. NOTE: __xlc__ expands to a double quoted string of four
58 numbers seperated by '.'s: currently "7.0.0.0" */
59 set need_a_set
[regsub
-all
{\
.} [join
{xlc __xlc__
} -] - compiler_info
]
62 #if defined (__ARMCC_VERSION)
63 set compiler_info
[join
{armcc __ARMCC_VERSION
} -]