]>
gcc.gnu.org Git - gcc.git/blob - libcpp/errors.c
1 /* Default error handlers for CPP Library.
2 Copyright (C) 1986, 1987, 1989, 1992, 1993, 1994, 1995, 1998, 1999, 2000,
3 2001, 2002, 2004, 2008, 2009 Free Software Foundation, Inc.
4 Written by Per Bothner, 1994.
5 Based on CCCP program by Paul Rubin, June 1986
6 Adapted to ANSI C, Richard Stallman, Jan 1987
8 This program is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the
10 Free Software Foundation; either version 3, or (at your option) any
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>.
22 In other words, you are welcome to use, share and improve this program.
23 You are forbidden to forbid anyone else to use, share and improve
24 what you give them. Help stamp out software-hoarding! */
31 /* Print a diagnostic at the location of the previously lexed token. */
33 ATTRIBUTE_FPTR_PRINTF(4,0)
35 cpp_diagnostic (cpp_reader
* pfile
, int level
, int reason
,
36 const char *msgid
, va_list *ap
)
38 source_location src_loc
;
41 if (CPP_OPTION (pfile
, traditional
))
43 if (pfile
->state
.in_directive
)
44 src_loc
= pfile
->directive_line
;
46 src_loc
= pfile
->line_table
->highest_line
;
48 /* We don't want to refer to a token before the beginning of the
49 current run -- that is invalid. */
50 else if (pfile
->cur_token
== pfile
->cur_run
->base
)
52 if (pfile
->cur_run
->prev
!= NULL
)
53 src_loc
= pfile
->cur_run
->prev
->limit
->src_loc
;
59 src_loc
= pfile
->cur_token
[-1].src_loc
;
64 ret
= pfile
->cb
.error (pfile
, level
, reason
, src_loc
, 0, _(msgid
), ap
);
69 /* Print a warning or error, depending on the value of LEVEL. */
72 cpp_error (cpp_reader
* pfile
, int level
, const char *msgid
, ...)
79 ret
= cpp_diagnostic (pfile
, level
, CPP_W_NONE
, msgid
, &ap
);
85 /* Print a warning. The warning reason may be given in REASON. */
88 cpp_warning (cpp_reader
* pfile
, int reason
, const char *msgid
, ...)
95 ret
= cpp_diagnostic (pfile
, CPP_DL_WARNING
, reason
, msgid
, &ap
);
101 /* Print a pedantic warning. The warning reason may be given in REASON. */
104 cpp_pedwarning (cpp_reader
* pfile
, int reason
, const char *msgid
, ...)
109 va_start (ap
, msgid
);
111 ret
= cpp_diagnostic (pfile
, CPP_DL_PEDWARN
, reason
, msgid
, &ap
);
117 /* Print a warning, including system headers. The warning reason may be
121 cpp_warning_syshdr (cpp_reader
* pfile
, int reason
, const char *msgid
, ...)
126 va_start (ap
, msgid
);
128 ret
= cpp_diagnostic (pfile
, CPP_DL_WARNING_SYSHDR
, reason
, msgid
, &ap
);
134 /* Print a diagnostic at a specific location. */
136 ATTRIBUTE_FPTR_PRINTF(6,0)
138 cpp_diagnostic_with_line (cpp_reader
* pfile
, int level
, int reason
,
139 source_location src_loc
, unsigned int column
,
140 const char *msgid
, va_list *ap
)
144 if (!pfile
->cb
.error
)
146 ret
= pfile
->cb
.error (pfile
, level
, reason
, src_loc
, column
, _(msgid
), ap
);
151 /* Print a warning or error, depending on the value of LEVEL. */
154 cpp_error_with_line (cpp_reader
*pfile
, int level
,
155 source_location src_loc
, unsigned int column
,
156 const char *msgid
, ...)
161 va_start (ap
, msgid
);
163 ret
= cpp_diagnostic_with_line (pfile
, level
, CPP_W_NONE
, src_loc
,
170 /* Print a warning. The warning reason may be given in REASON. */
173 cpp_warning_with_line (cpp_reader
*pfile
, int reason
,
174 source_location src_loc
, unsigned int column
,
175 const char *msgid
, ...)
180 va_start (ap
, msgid
);
182 ret
= cpp_diagnostic_with_line (pfile
, CPP_DL_WARNING
, reason
, src_loc
,
189 /* Print a pedantic warning. The warning reason may be given in REASON. */
192 cpp_pedwarning_with_line (cpp_reader
*pfile
, int reason
,
193 source_location src_loc
, unsigned int column
,
194 const char *msgid
, ...)
199 va_start (ap
, msgid
);
201 ret
= cpp_diagnostic_with_line (pfile
, CPP_DL_PEDWARN
, reason
, src_loc
,
208 /* Print a warning, including system headers. The warning reason may be
212 cpp_warning_with_line_syshdr (cpp_reader
*pfile
, int reason
,
213 source_location src_loc
, unsigned int column
,
214 const char *msgid
, ...)
219 va_start (ap
, msgid
);
221 ret
= cpp_diagnostic_with_line (pfile
, CPP_DL_WARNING_SYSHDR
, reason
, src_loc
,
228 /* Print a warning or error, depending on the value of LEVEL. Include
229 information from errno. */
232 cpp_errno (cpp_reader
*pfile
, int level
, const char *msgid
)
234 if (msgid
[0] == '\0')
237 return cpp_error (pfile
, level
, "%s: %s", msgid
, xstrerror (errno
));
This page took 0.042376 seconds and 5 git commands to generate.