aboutsummaryrefslogtreecommitdiff
path: root/lang/gcc-devel/files/patch-fa
diff options
context:
space:
mode:
Diffstat (limited to 'lang/gcc-devel/files/patch-fa')
-rw-r--r--lang/gcc-devel/files/patch-fa100
1 files changed, 40 insertions, 60 deletions
diff --git a/lang/gcc-devel/files/patch-fa b/lang/gcc-devel/files/patch-fa
index 55221295f0b7..d6b90e4ba86c 100644
--- a/lang/gcc-devel/files/patch-fa
+++ b/lang/gcc-devel/files/patch-fa
@@ -1,6 +1,6 @@
---- gcc/c-common.c.orig Fri Aug 25 08:27:55 2000
-+++ gcc/c-common.c Fri Sep 15 11:30:42 2000
-@@ -157,7 +157,7 @@
+--- gcc/c-common.c.orig Mon Sep 25 10:04:45 2000
++++ gcc/c-common.c Mon Oct 9 02:51:14 2000
+@@ -171,7 +171,7 @@
int, int, int));
static void init_attributes PARAMS ((void));
static void record_function_format PARAMS ((tree, tree, enum format_type,
@@ -9,7 +9,7 @@
static void record_international_format PARAMS ((tree, tree, int));
static int default_valid_lang_attribute PARAMS ((tree, tree, tree, tree));
-@@ -827,6 +827,7 @@
+@@ -862,6 +862,7 @@
enum format_type format_type;
tree argument;
unsigned int arg_num;
@@ -17,7 +17,7 @@
if (TREE_CODE (decl) != FUNCTION_DECL)
{
-@@ -837,7 +838,7 @@
+@@ -872,7 +873,7 @@
if (TREE_CODE (format_type_id) != IDENTIFIER_NODE)
{
@@ -26,7 +26,7 @@
continue;
}
else
-@@ -845,12 +846,26 @@
+@@ -880,12 +881,26 @@
const char *p = IDENTIFIER_POINTER (format_type_id);
if (!strcmp (p, "printf") || !strcmp (p, "__printf__"))
@@ -52,8 +52,8 @@
+ }
else
{
- warning ("`%s' is an unrecognized format function type", p);
-@@ -923,7 +938,8 @@
+ status_warning (status, "`%s' is an unrecognized format function type", p);
+@@ -958,7 +973,8 @@
record_function_format (DECL_NAME (decl),
DECL_ASSEMBLER_NAME (decl),
@@ -63,19 +63,21 @@
break;
}
-@@ -1242,6 +1258,11 @@
- } format_char_info;
+@@ -1441,6 +1457,13 @@
- static format_char_info print_char_table[] = {
+ static const format_char_info print_char_table[] =
+ {
++#ifdef XXX_NEED_TO_UPDATE_THIS_FOR_GCC297_CHANGES
+/* FreeBSD kernel extensions. */
+ { "D", 1, T_C, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
+ { "b", 1, T_C, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
+ { "rz", 0, NULL, T_I, T_I, T_L, NULL, NULL, NULL, "-wp0 +#" },
+#define unextended_print_char_table (print_char_table + 3)
- { "di", 0, T_I, T_I, T_I, T_L, T_LL, T_LL, T_SST, T_PD, T_IM, "-wp0 +'I" },
- { "oxX", 0, T_UI, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, T_UPD, T_UIM, "-wp0#" },
- { "u", 0, T_UI, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, T_UPD, T_UIM, "-wp0'I" },
-@@ -1314,6 +1335,7 @@
++#endif
+ /* C89 conversion specifiers. */
+ { "di", 0, STD_C89, { T89_I, T99_I, T89_I, T89_L, T99_LL, TEX_LL, T99_SST, T99_PD, T99_IM }, "-wp0 +'I", "i" },
+ { "oxX", 0, STD_C89, { T89_UI, T99_UI, T89_UI, T89_UL, T99_ULL, TEX_ULL, T99_ST, T99_UPD, T99_UIM }, "-wp0#", "i" },
+@@ -1526,6 +1549,7 @@
enum format_type format_type; /* type of format (printf, scanf, etc.) */
int format_num; /* number of format argument */
int first_arg_num; /* number of first arg (zero for varargs) */
@@ -83,12 +85,15 @@
} function_format_info;
static function_format_info *function_format_list = NULL;
-@@ -1354,40 +1376,40 @@
+@@ -1570,42 +1594,42 @@
{
/* Functions from ISO/IEC 9899:1990. */
record_function_format (get_identifier ("printf"), NULL_TREE,
- printf_format_type, 1, 2);
+ printf_format_type, 1, 2, 0);
+ record_function_format (get_identifier ("__builtin_printf"), NULL_TREE,
+- printf_format_type, 1, 2);
++ printf_format_type, 1, 2, 0);
record_function_format (get_identifier ("fprintf"), NULL_TREE,
- printf_format_type, 2, 3);
+ printf_format_type, 2, 3, 0);
@@ -139,7 +144,7 @@
}
if (flag_hosted && flag_noniso_default_format_attributes)
-@@ -1410,12 +1432,13 @@
+@@ -1630,12 +1654,13 @@
static void
record_function_format (name, assembler_name, format_type,
@@ -154,7 +159,7 @@
{
function_format_info *info;
-@@ -1439,6 +1462,7 @@
+@@ -1659,6 +1684,7 @@
info->format_type = format_type;
info->format_num = format_num;
info->first_arg_num = first_arg_num;
@@ -162,32 +167,16 @@
}
/* Record information for the names of function that modify the format
-@@ -1755,7 +1779,8 @@
+@@ -2019,7 +2045,7 @@
if (integer_zerop (format_tree))
{
-- warning ("null format string");
-+ if (!info->null_format_ok)
-+ warning ("null format string");
+- status_warning (status, "null format string");
++ if (!info->null_format_ok) status_warning (status, "null format string");
return;
}
if (TREE_CODE (format_tree) != ADDR_EXPR)
-@@ -1981,12 +2006,13 @@
- It will work on most machines, because size_t and int
- have the same mode. But might as well warn anyway,
- since it will fail on other machines. */
-+ /* XXX should we allow unsigned ints here? */
- if ((TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
- != integer_type_node)
- &&
- (TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
- != unsigned_type_node))
-- warning ("field width is not type int (arg %d)", arg_num);
-+ warning ("precision is not type int (arg %d)", arg_num);
- }
- }
- else
-@@ -2046,6 +2072,53 @@
+@@ -2340,6 +2366,54 @@
}
}
}
@@ -196,7 +185,7 @@
+ /* There should be an int arg to control the string arg. */
+ if (params == 0)
+ {
-+ tfaff ();
++ status_warning (status, "too few arguments for format");
+ return;
+ }
+ if (info->first_arg_num != 0)
@@ -210,7 +199,7 @@
+ (TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
+ != unsigned_type_node))
+ {
-+ warning ("bitmap is not type int (arg %d)", arg_num);
++ status_warning (status, "bitmap is not type int (arg %d)", arg_num);
+ }
+ }
+ }
@@ -219,11 +208,12 @@
+ /* There should be an unsigned char * arg before the string arg. */
+ if (params == 0)
+ {
-+ tfaff ();
++ status_warning (status, "too few arguments for format");
+ return;
+ }
+ if (info->first_arg_num != 0)
+ {
++ tree cur_type;
+ cur_param = TREE_VALUE (params);
+ params = TREE_CHAIN (params);
+ ++arg_num;
@@ -232,8 +222,8 @@
+ || TYPE_MAIN_VARIANT (TREE_TYPE (cur_type))
+ != unsigned_char_type_node)
+ {
-+ warning ("ethernet address is not type unsigned char *"
-+ " (arg %d)",
++ status_warning (status,
++ "ethernet address is not type unsigned char * (arg %d)",
+ arg_num);
+ }
+ }
@@ -241,22 +231,12 @@
aflag = 0;
-@@ -2130,7 +2203,8 @@
- switch (info->format_type)
- {
- case printf_format_type:
-- fci = print_char_table;
-+ fci = flag_format_extensions ? print_char_table
-+ : unextended_print_char_table;
- break;
- case scanf_format_type:
- fci = scan_char_table;
-@@ -2174,7 +2248,7 @@
- warning ("width used with `%c' format", format_char);
- if (index (fci->flag_chars, '3') != 0
+@@ -2441,7 +2515,7 @@
+ status_warning (status, "width used with `%c' format", format_char);
+ if (index (fci->flags2, '3') != 0
|| (format_char == 'y' && index (flag_chars, 'E')))
-- warning ("`%%%c' yields only last 2 digits of year in some locales",
-+ warning ("`%%%c' yields only last 2 digits of year in some locales on non-BSD systems",
+- status_warning (status, "`%%%c' yields only last 2 digits of year in some locales",
++ status_warning (status, "`%%%c' yields only last 2 digits of year in some locales on non-BSD systems",
format_char);
- else if (index (fci->flag_chars, '2') != 0)
- warning ("`%%%c' yields only last 2 digits of year", format_char);
+ else if (index (fci->flags2, '2') != 0)
+ status_warning (status, "`%%%c' yields only last 2 digits of year", format_char);