1 /* RTL specific diagnostic subroutines for GCC
2 Copyright (C) 2001, 2002, 2003 Free Software Foundation, Inc.
3 Contributed by Gabriel Dos Reis <gdr@codesourcery.com>
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
23 #undef FLOAT /* This is for hpux. They should change hpux. */
24 #undef FFS /* Some systems define this in param.h. */
26 #include "coretypes.h"
29 #include "insn-attr.h"
30 #include "insn-config.h"
34 #include "diagnostic.h"
36 static location_t location_for_asm
PARAMS ((rtx
));
37 static void diagnostic_for_asm
PARAMS ((rtx
, const char *, va_list *,
40 /* Figure the location of the given INSN. */
42 location_for_asm (insn
)
45 rtx body
= PATTERN (insn
);
49 /* Find the (or one of the) ASM_OPERANDS in the insn. */
50 if (GET_CODE (body
) == SET
&& GET_CODE (SET_SRC (body
)) == ASM_OPERANDS
)
51 asmop
= SET_SRC (body
);
52 else if (GET_CODE (body
) == ASM_OPERANDS
)
54 else if (GET_CODE (body
) == PARALLEL
55 && GET_CODE (XVECEXP (body
, 0, 0)) == SET
)
56 asmop
= SET_SRC (XVECEXP (body
, 0, 0));
57 else if (GET_CODE (body
) == PARALLEL
58 && GET_CODE (XVECEXP (body
, 0, 0)) == ASM_OPERANDS
)
59 asmop
= XVECEXP (body
, 0, 0);
65 loc
.file
= ASM_OPERANDS_SOURCE_FILE (asmop
);
66 loc
.line
= ASM_OPERANDS_SOURCE_LINE (asmop
);
73 /* Report a diagnostic MESSAGE (an errror or a WARNING) at the line number
74 of the insn INSN. This is used only when INSN is an `asm' with operands,
75 and each ASM_OPERANDS records its own source file and line. */
77 diagnostic_for_asm (insn
, msg
, args_ptr
, kind
)
83 diagnostic_info diagnostic
;
85 diagnostic_set_info (&diagnostic
, msg
, args_ptr
,
86 location_for_asm (insn
), kind
);
87 report_diagnostic (&diagnostic
);
91 error_for_asm (rtx insn
, const char *msgid
, ...)
96 diagnostic_for_asm (insn
, msgid
, &ap
, DK_ERROR
);
101 warning_for_asm (rtx insn
, const char *msgid
, ...)
105 va_start (ap
, msgid
);
106 diagnostic_for_asm (insn
, msgid
, &ap
, DK_WARNING
);
111 _fatal_insn (msgid
, insn
, file
, line
, function
)
116 const char *function
;
118 error ("%s", _(msgid
));
120 /* The above incremented error_count, but isn't an error that we want to
121 count, so reset it here. */
125 fancy_abort (file
, line
, function
);
129 _fatal_insn_not_found (insn
, file
, line
, function
)
133 const char *function
;
135 if (INSN_CODE (insn
) < 0)
136 _fatal_insn ("unrecognizable insn:", insn
, file
, line
, function
);
138 _fatal_insn ("insn does not satisfy its constraints:",
139 insn
, file
, line
, function
);