OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [errors.c] - Blame information for rev 280

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 280 jeremybenn
/* Basic error reporting routines.
2
   Copyright (C) 1999, 2000, 2001, 2003, 2004, 2005, 2007, 2008
3
   Free Software Foundation, Inc.
4
 
5
This file is part of GCC.
6
 
7
GCC is free software; you can redistribute it and/or modify it under
8
the terms of the GNU General Public License as published by the Free
9
Software Foundation; either version 3, or (at your option) any later
10
version.
11
 
12
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13
WARRANTY; without even the implied warranty of MERCHANTABILITY or
14
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
15
for more details.
16
 
17
You should have received a copy of the GNU General Public License
18
along with GCC; see the file COPYING3.  If not see
19
<http://www.gnu.org/licenses/>.  */
20
 
21
/* warning, error, and fatal.  These definitions are suitable for use
22
   in the generator programs; the compiler has a more elaborate suite
23
   of diagnostic printers, found in diagnostic.c.  */
24
 
25
#ifdef GENERATOR_FILE
26
#include "bconfig.h"
27
#else
28
#include "config.h"
29
#endif
30
#include "system.h"
31
#include "errors.h"
32
 
33
/* Set this to argv[0] at the beginning of main.  */
34
 
35
const char *progname;
36
 
37
/* Starts out 0, set to 1 if error is called.  */
38
 
39
int have_error = 0;
40
 
41
/* Print a warning message - output produced, but there may be problems.  */
42
 
43
void
44
warning (const char *format, ...)
45
{
46
  va_list ap;
47
 
48
  va_start (ap, format);
49
  fprintf (stderr, "%s: warning: ", progname);
50
  vfprintf (stderr, format, ap);
51
  va_end (ap);
52
  fputc('\n', stderr);
53
}
54
 
55
 
56
/* Print an error message - we keep going but the output is unusable.  */
57
 
58
void
59
error (const char *format, ...)
60
{
61
  va_list ap;
62
 
63
  va_start (ap, format);
64
  fprintf (stderr, "%s: ", progname);
65
  vfprintf (stderr, format, ap);
66
  va_end (ap);
67
  fputc('\n', stderr);
68
 
69
  have_error = 1;
70
}
71
 
72
 
73
/* Fatal error - terminate execution immediately.  Does not return.  */
74
 
75
void
76
fatal (const char *format, ...)
77
{
78
  va_list ap;
79
 
80
  va_start (ap, format);
81
  fprintf (stderr, "%s: ", progname);
82
  vfprintf (stderr, format, ap);
83
  va_end (ap);
84
  fputc('\n', stderr);
85
  exit (FATAL_EXIT_CODE);
86
}
87
 
88
/* Similar, but say we got an internal error.  */
89
 
90
void
91
internal_error (const char *format, ...)
92
{
93
  va_list ap;
94
 
95
  va_start (ap, format);
96
  fprintf (stderr, "%s: Internal error: ", progname);
97
  vfprintf (stderr, format, ap);
98
  va_end (ap);
99
  fputc ('\n', stderr);
100
  exit (FATAL_EXIT_CODE);
101
}
102
 
103
/* Given a partial pathname as input, return another pathname that
104
   shares no directory elements with the pathname of __FILE__.  This
105
   is used by fancy_abort() to print `Internal compiler error in expr.c'
106
   instead of `Internal compiler error in ../../GCC/gcc/expr.c'.  This
107
   version is meant to be used for the gen* programs and therefor need not
108
   handle subdirectories.  */
109
 
110
const char *
111
trim_filename (const char *name)
112
{
113
  static const char this_file[] = __FILE__;
114
  const char *p = name, *q = this_file;
115
 
116
  /* Skip any parts the two filenames have in common.  */
117
  while (*p == *q && *p != 0 && *q != 0)
118
    p++, q++;
119
 
120
  /* Now go backwards until the previous directory separator.  */
121
  while (p > name && !IS_DIR_SEPARATOR (p[-1]))
122
    p--;
123
 
124
  return p;
125
}
126
 
127
/* "Fancy" abort.  Reports where in the compiler someone gave up.
128
   This file is used only by build programs, so we're not as polite as
129
   the version in diagnostic.c.  */
130
void
131
fancy_abort (const char *file, int line, const char *func)
132
{
133
  internal_error ("abort in %s, at %s:%d", func, trim_filename (file), line);
134
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.