re PR libfortran/15311 (Incorrect handling of A edit descriptor)
[official-gcc.git] / gcc / genpreds.c
blobe52e424dd3c06528ede253f996864ac16ba45ab2
1 /* Generate from machine description:
2 - some macros CODE_FOR_... giving the insn_code_number value
3 for each of the defined standard insn names.
4 Copyright (C) 1987, 1991, 1995, 1998,
5 1999, 2000, 2001, 2003 Free Software Foundation, Inc.
7 This file is part of GCC.
9 GCC is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2, or (at your option)
12 any later version.
14 GCC is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with GCC; see the file COPYING. If not, write to
21 the Free Software Foundation, 59 Temple Place - Suite 330,
22 Boston, MA 02111-1307, USA. */
24 #include "bconfig.h"
25 #include "system.h"
26 #include "coretypes.h"
27 #include "tm.h"
29 #define NO_GENRTL_H
30 #include "rtl.h"
33 static void
34 output_predicate_decls (void)
36 #ifdef PREDICATE_CODES
37 static const struct {
38 const char *const name;
39 const RTX_CODE codes[NUM_RTX_CODE];
40 } predicate[] = {
41 PREDICATE_CODES
43 size_t i;
45 puts ("#ifdef RTX_CODE\n");
46 for (i = 0; i < ARRAY_SIZE (predicate); i++)
47 printf ("extern int %s (rtx, enum machine_mode);\n",
48 predicate[i].name);
49 puts ("\n#endif /* RTX_CODE */\n");
50 #endif
53 int
54 main (void)
56 puts ("/* Generated automatically by the program `genpreds'. */\n");
57 puts ("#ifndef GCC_TM_PREDS_H");
58 puts ("#define GCC_TM_PREDS_H\n");
60 output_predicate_decls ();
62 puts ("#endif /* GCC_TM_PREDS_H */");
64 if (ferror (stdout) || fflush (stdout) || fclose (stdout))
65 return FATAL_EXIT_CODE;
67 return SUCCESS_EXIT_CODE;