| /* Generate from machine description: |
| - some macros CODE_FOR_... giving the insn_code_number value |
| for each of the defined standard insn names. |
| Copyright (C) 1987, 1991, 1995, 1998, |
| 1999, 2000, 2001 Free Software Foundation, Inc. |
| |
| This file is part of GNU CC. |
| |
| GNU CC is free software; you can redistribute it and/or modify |
| it under the terms of the GNU General Public License as published by |
| the Free Software Foundation; either version 2, or (at your option) |
| any later version. |
| |
| GNU CC is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of the GNU General Public License |
| along with GNU CC; see the file COPYING. If not, write to |
| the Free Software Foundation, 59 Temple Place - Suite 330, |
| Boston, MA 02111-1307, USA. */ |
| |
| |
| #include "hconfig.h" |
| #include "system.h" |
| #include "rtl.h" |
| #include "errors.h" |
| #include "gensupport.h" |
| |
| |
| static int insn_code_number; |
| |
| static void gen_insn PARAMS ((rtx)); |
| static void output_predicate_decls PARAMS ((void)); |
| static int print_md_constant PARAMS ((void **, void *)); |
| |
| static void |
| gen_insn (insn) |
| rtx insn; |
| { |
| /* Don't mention instructions whose names are the null string |
| or begin with '*'. They are in the machine description just |
| to be recognized. */ |
| if (XSTR (insn, 0)[0] != 0 && XSTR (insn, 0)[0] != '*') |
| printf (" CODE_FOR_%s = %d,\n", XSTR (insn, 0), |
| insn_code_number); |
| } |
| |
| /* Print out declarations for all predicates mentioned in |
| PREDICATE_CODES. */ |
| |
| static void |
| output_predicate_decls () |
| { |
| #ifdef PREDICATE_CODES |
| static struct { |
| const char *name; |
| RTX_CODE codes[NUM_RTX_CODE]; |
| } predicate[] = { |
| PREDICATE_CODES |
| }; |
| size_t i; |
| |
| putc ('\n', stdout); |
| puts ("struct rtx_def;\n#include \"machmode.h\"\n"); |
| for (i = 0; i < sizeof predicate / sizeof *predicate; i++) |
| printf ("extern int %s PARAMS ((struct rtx_def *, enum machine_mode));\n", |
| predicate[i].name); |
| putc ('\n', stdout); |
| #endif |
| } |
| |
| extern int main PARAMS ((int, char **)); |
| |
| int |
| main (argc, argv) |
| int argc; |
| char **argv; |
| { |
| rtx desc; |
| |
| progname = "gencodes"; |
| |
| if (argc <= 1) |
| fatal ("No input file name."); |
| |
| if (init_md_reader (argv[1]) != SUCCESS_EXIT_CODE) |
| return (FATAL_EXIT_CODE); |
| |
| printf ("/* Generated automatically by the program `gencodes'\n\ |
| from the machine description file `md'. */\n\n"); |
| |
| printf ("#ifndef MAX_INSN_CODE\n\n"); |
| |
| /* Read the machine description. */ |
| |
| insn_code_number = 0; |
| printf ("enum insn_code {\n"); |
| |
| while (1) |
| { |
| int line_no; |
| |
| desc = read_md_rtx (&line_no, &insn_code_number); |
| if (desc == NULL) |
| break; |
| |
| if (GET_CODE (desc) == DEFINE_INSN || GET_CODE (desc) == DEFINE_EXPAND) |
| gen_insn (desc); |
| } |
| |
| printf (" CODE_FOR_nothing = %d };\n", insn_code_number + 1); |
| |
| printf ("\n#define MAX_INSN_CODE ((int) CODE_FOR_nothing)\n\n"); |
| |
| traverse_md_constants (print_md_constant, stdout); |
| |
| output_predicate_decls (); |
| |
| printf ("\n#endif /* MAX_INSN_CODE */\n"); |
| |
| fflush (stdout); |
| return (ferror (stdout) != 0 ? FATAL_EXIT_CODE : SUCCESS_EXIT_CODE); |
| } |
| |
| /* Define this so we can link with print-rtl.o to get debug_rtx function. */ |
| |
| const char * |
| get_insn_name (code) |
| int code ATTRIBUTE_UNUSED; |
| { |
| return NULL; |
| } |
| |
| /* Called via traverse_md_constants; emit a #define for |
| the current constant definition. */ |
| |
| static int |
| print_md_constant (slot, info) |
| void **slot; |
| void *info; |
| { |
| struct md_constant *def = *slot; |
| FILE *file = info; |
| |
| fprintf (file, "#define %s %s\n", def->name, def->value); |
| return 1; |
| } |