- {
- if (special_format (defs[i].format))
- continue;
- genmacro (f, i);
- }
-}
-
-/* Emit "genrtl.c". */
-
-static void
-gencode (f)
- FILE *f;
-{
- const char **fmt;
-
- fputs ("#include \"config.h\"\n", f);
- fputs ("#include \"system.h\"\n", f);
- fputs ("#include \"obstack.h\"\n", f);
- fputs ("#include \"rtl.h\"\n", f);
- fputs ("#include \"ggc.h\"\n\n", f);
- fputs ("extern struct obstack *rtl_obstack;\n\n", f);
- fputs ("static rtx obstack_alloc_rtx PROTO((int length));\n", f);
- fputs ("static rtx obstack_alloc_rtx (length)\n", f);
- fputs (" register int length;\n{\n", f);
- fputs (" rtx rt = (rtx) obstack_alloc (rtl_obstack, length);\n\n", f);
- fputs (" memset(rt, 0, sizeof(struct rtx_def) - sizeof(rtunion));\n\n", f);
- fputs (" return rt;\n}\n\n", f);