+2003-03-15 Roger Sayle <roger@eyesopen.com>
+
+ * stb.c (ffestb_R100110_): Allow the number before the X format
+ to be optional when not -fpedantic.
+ * std.c (ffestd_R1001dump_1010_3_): Delete unused static function.
+ (ffestd_R1001dump_): For the FFESTP_formattypeX case, call
+ ffestd_R1001dump_1010_2_ instead of ffestd_R1001dump_1010_3_.
+
2003-03-15 Roger Sayle <roger@eyesopen.com>
* f/ste.c (ffeste_R810): Fix whitespace.
const char *string);
static void ffestd_R1001dump_1010_2_ (ffests s, ffesttFormatList f,
const char *string);
-static void ffestd_R1001dump_1010_3_ (ffests s, ffesttFormatList f,
- const char *string);
static void ffestd_R1001dump_1010_4_ (ffests s, ffesttFormatList f,
const char *string);
static void ffestd_R1001dump_1010_5_ (ffests s, ffesttFormatList f,
break;
case FFESTP_formattypeX:
- ffestd_R1001dump_1010_3_ (s, next, "X");
+ ffestd_R1001dump_1010_2_ (s, next, "X");
break;
case FFESTP_formattypeS:
ffests_puts (s, string);
}
-/* ffestd_R1001dump_1010_3_ -- Dump a particular format
-
- ffesttFormatList f;
- ffestd_R1001dump_1010_3_(f,"I");
-
- The format is dumped with form nX. */
-
-static void
-ffestd_R1001dump_1010_3_ (ffests s, ffesttFormatList f, const char *string)
-{
- assert (f->u.R1010.val.present);
-
- if (f->u.R1010.val.rtexpr)
- ffestd_R1001rtexpr_ (s, f, f->u.R1010.val.u.expr);
- else
- ffests_printf (s, "%lu", f->u.R1010.val.u.unsigned_val);
-
- ffests_puts (s, string);
-}
-
/* ffestd_R1001dump_1010_4_ -- Dump a particular format
ffesttFormatList f;