This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[980307]: Warning patches #3/5 - Unused variables, functions, etc.
- To: egcs-bugs at cygnus dot com
- Subject: [980307]: Warning patches #3/5 - Unused variables, functions, etc.
- From: Manfred Hollstein <manfred at s-direktnet dot de>
- Date: Sun, 8 Mar 1998 19:17:37 +0100 (MET)
- CC: Manfred dot Hollstein at ks dot sel dot alcatel dot de
- Reply-To: Manfred Hollstein <manfred at s-direktnet dot de>
This patch
1. removes definitions of unused variables
2. surrounds prototype/function definitions with proper #ifdef ...
#endif's
3. adds some missing explicit parameter definitions
4. adds a fake return to shut up the compiler
5. adds some missing initializations
gcc/ChangeLog:
Sun Mar 8 17:06:02 1998 Manfred Hollstein <manfred@s-direktnet.de>
* bitmap.c (bitmap_element_allocate): Remove unused parameter;
change callers accordingly.
* cplus-dem.c (arm_special): Remove unused parameter work in prototype
and definition; change all callers accordingly.
* except.c (init_eh): Avoid assignment of unused return value of
build_pointer_type; cast it to void, instead, and remove unused
variable type.
* gcc.c (lang_specific_driver): Define prototype only #ifdef
LANG_SPECIFIC_DRIVER.
(temp_names): Define only #ifdef MKTEMP_EACH_FILE.
* genoutput.c (output_epilogue): Initialize next_name to 0.
* genattr.c (fatal): Add explicit definition of int parameters.
* genconfig.c (fatal): Likewise.
* genemit.c (fatal): Likewise.
* genextract.c (fatal): Likewise.
* genflags.c (fatal): Likewise.
* genopinit.c (fatal): Likewise.
* genoutput.c (fatal): Likewise.
* genpeep.c (fatal): Likewise.
* real.c (efrexp): #if 0 prototype and function definition.
(eremain): Likewise.
(uditoe): Likewise.
(ditoe): Likewise.
(etoudi): Likewise.
(etodi): Likewise.
(esqrt): Likewise.
* reload.c (push_secondary_reload): Define prototype only
#ifdef HAVE_SECONDARY_RELOADS.
* varasm.c (assemble_static_space): Define rounded only
#ifndef ASM_OUTPUT_ALIGNED_LOCAL.
gcc/cp/ChangeLog:
Sun Mar 8 17:13:38 1998 Manfred Hollstein <manfred@s-direktnet.de>
* call.c (default_parm_conversions): Remove prototype definition.
(build_method_call): Remove unused variable result.
* cvt.c (ocp_convert): Remove unused variable conversion.
* decl2.c (ambiguous_decl): Add explicit parameter definition for name.
* except.c (do_unwind): #if 0 definition of unused variables fcall
and next_pc.
* expr.c (extract_scalar_init): #if 0 prototype and function definition.
* init.c (expand_aggr_init_1): Remove unused variable init_type.
(build_new_1): Remove unused variable t.
* pt.c (instantiate_class_template): Remove unused variable newtag;
cast called function return value to void.
(do_decl_instantiation): Remove unused variables name and fn.
* tree.c (get_type_decl): Add default return to shut up compiler from
complaining control reaches end of non-void function.
* typeck.c (build_x_conditional_expr): Remove unused variable rval.
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/bitmap.c egcs-980307/gcc/bitmap.c
*** egcs-980307.orig/gcc/bitmap.c Sat Feb 14 21:34:02 1998
--- egcs-980307/gcc/bitmap.c Sun Mar 8 15:11:05 1998
*************** bitmap_element bitmap_zero; /* An eleme
*** 52,58 ****
bitmap_element *bitmap_free; /* Freelist of bitmap elements. */
static void bitmap_element_free PROTO((bitmap, bitmap_element *));
! static bitmap_element *bitmap_element_allocate PROTO((bitmap));
static int bitmap_element_zerop PROTO((bitmap_element *));
static void bitmap_element_link PROTO((bitmap, bitmap_element *));
static bitmap_element *bitmap_find_bit PROTO((bitmap, unsigned int));
--- 52,58 ----
bitmap_element *bitmap_free; /* Freelist of bitmap elements. */
static void bitmap_element_free PROTO((bitmap, bitmap_element *));
! static bitmap_element *bitmap_element_allocate PROTO(());
static int bitmap_element_zerop PROTO((bitmap_element *));
static void bitmap_element_link PROTO((bitmap, bitmap_element *));
static bitmap_element *bitmap_find_bit PROTO((bitmap, unsigned int));
*************** bitmap_element_free (head, elt)
*** 88,95 ****
/* Allocate a bitmap element. The bits are cleared, but nothing else is. */
static INLINE bitmap_element *
! bitmap_element_allocate (head)
! bitmap head;
{
bitmap_element *element;
#if BITMAP_ELEMENT_WORDS != 2
--- 88,94 ----
/* Allocate a bitmap element. The bits are cleared, but nothing else is. */
static INLINE bitmap_element *
! bitmap_element_allocate ()
{
bitmap_element *element;
#if BITMAP_ELEMENT_WORDS != 2
*************** bitmap_copy (to, from)
*** 257,263 ****
/* Copy elements in forward direction one at a time */
for (from_ptr = from->first; from_ptr; from_ptr = from_ptr->next)
{
! bitmap_element *to_elt = bitmap_element_allocate (to);
to_elt->indx = from_ptr->indx;
--- 256,262 ----
/* Copy elements in forward direction one at a time */
for (from_ptr = from->first; from_ptr; from_ptr = from_ptr->next)
{
! bitmap_element *to_elt = bitmap_element_allocate ();
to_elt->indx = from_ptr->indx;
*************** bitmap_set_bit (head, bit)
*** 364,370 ****
if (ptr == 0)
{
! ptr = bitmap_element_allocate (head);
ptr->indx = bit / BITMAP_ELEMENT_ALL_BITS;
ptr->bits[word_num] = bit_val;
bitmap_element_link (head, ptr);
--- 363,369 ----
if (ptr == 0)
{
! ptr = bitmap_element_allocate ();
ptr->indx = bit / BITMAP_ELEMENT_ALL_BITS;
ptr->bits[word_num] = bit_val;
bitmap_element_link (head, ptr);
*************** bitmap_operation (to, from1, from2, oper
*** 463,469 ****
}
if (to_ptr == 0)
! to_ptr = bitmap_element_allocate (to);
/* Do the operation, and if any bits are set, link it into the
linked list. */
--- 462,468 ----
}
if (to_ptr == 0)
! to_ptr = bitmap_element_allocate ();
/* Do the operation, and if any bits are set, link it into the
linked list. */
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/call.c egcs-980307/gcc/cp/call.c
*** egcs-980307.orig/gcc/cp/call.c Thu Mar 5 09:20:42 1998
--- egcs-980307/gcc/cp/call.c Sun Mar 8 12:12:06 1998
*************** static tree reference_binding PROTO((tre
*** 87,93 ****
static tree strip_top_quals PROTO((tree));
static tree non_reference PROTO((tree));
static tree build_conv PROTO((enum tree_code, tree, tree));
- static tree default_parm_conversions PROTO((tree, tree *));
static int is_subseq PROTO((tree, tree));
tree
--- 87,92 ----
*************** build_method_call (instance, name, parms
*** 557,563 ****
tree instance, name, parms, basetype_path;
int flags;
{
! tree result, basetype, instance_ptr;
#ifdef GATHER_STATISTICS
n_build_method_call++;
--- 556,562 ----
tree instance, name, parms, basetype_path;
int flags;
{
! tree basetype, instance_ptr;
#ifdef GATHER_STATISTICS
n_build_method_call++;
*************** build_method_call (instance, name, parms
*** 585,599 ****
if (name == ansi_opname[(int) DELETE_EXPR] && list_length (parms)==2)
{
tree save_last = TREE_CHAIN (parms);
! tree result;
/* get rid of unneeded argument */
TREE_CHAIN (parms) = NULL_TREE;
! result = build_method_call (instance, name, parms, basetype_path,
! (LOOKUP_SPECULATIVELY|flags)
! &~LOOKUP_COMPLAIN);
! /* If it finds a match, return it. */
! if (result)
! return build_method_call (instance, name, parms, basetype_path, flags);
/* If it doesn't work, two argument delete must work */
TREE_CHAIN (parms) = save_last;
}
--- 584,598 ----
if (name == ansi_opname[(int) DELETE_EXPR] && list_length (parms)==2)
{
tree save_last = TREE_CHAIN (parms);
!
/* get rid of unneeded argument */
TREE_CHAIN (parms) = NULL_TREE;
! if (build_method_call (instance, name, parms, basetype_path,
! (LOOKUP_SPECULATIVELY|flags) & ~LOOKUP_COMPLAIN))
! {
! /* If it finds a match, return it. */
! return build_method_call (instance, name, parms, basetype_path, flags);
! }
/* If it doesn't work, two argument delete must work */
TREE_CHAIN (parms) = save_last;
}
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/cvt.c egcs-980307/gcc/cp/cvt.c
*** egcs-980307.orig/gcc/cp/cvt.c Thu Mar 5 09:20:44 1998
--- egcs-980307/gcc/cp/cvt.c Sun Mar 8 15:46:24 1998
*************** ocp_convert (type, expr, convtype, flags
*** 761,767 ****
{
tree dtype = TREE_TYPE (e);
tree ctor = NULL_TREE;
- tree conversion = NULL_TREE;
dtype = TYPE_MAIN_VARIANT (dtype);
--- 761,766 ----
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/decl2.c egcs-980307/gcc/cp/decl2.c
*** egcs-980307.orig/gcc/cp/decl2.c Thu Mar 5 09:20:45 1998
--- egcs-980307/gcc/cp/decl2.c Sun Mar 8 16:53:44 1998
*************** add_using_namespace (user, used, indirec
*** 3702,3707 ****
--- 3703,3709 ----
XXX I don't want to repeat the entire duplicate_decls here */
static tree
ambiguous_decl (name, val1, val2)
+ int name;
tree val1, val2;
{
my_friendly_assert (val1 != val2, 376);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/except.c egcs-980307/gcc/cp/except.c
*** egcs-980307.orig/gcc/cp/except.c Mon Feb 2 01:03:54 1998
--- egcs-980307/gcc/cp/except.c Sun Mar 8 15:47:31 1998
*************** do_unwind (inner_throw_label)
*** 714,722 ****
#endif
#endif
#if ! defined (TARGET_88000) && ! defined (ARM_FRAME_RTX) && ! defined (SPARC_STACK_ALIGN)
tree fcall;
- tree params;
rtx next_pc;
#if 0
/* I would like to do this here, but the move below doesn't seem to work. */
--- 714,724 ----
#endif
#endif
#if ! defined (TARGET_88000) && ! defined (ARM_FRAME_RTX) && ! defined (SPARC_STACK_ALIGN)
+ #if 0
tree fcall;
rtx next_pc;
+ #endif
+ tree params;
#if 0
/* I would like to do this here, but the move below doesn't seem to work. */
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/expr.c egcs-980307/gcc/cp/expr.c
*** egcs-980307.orig/gcc/cp/expr.c Wed Feb 4 02:29:33 1998
--- egcs-980307/gcc/cp/expr.c Sun Mar 8 15:35:25 1998
*************** Boston, MA 02111-1307, USA. */
*** 29,35 ****
--- 29,37 ----
#include "cp-tree.h"
static tree extract_aggr_init PROTO((tree, tree));
+ #if 0
static tree extract_scalar_init PROTO((tree, tree));
+ #endif
static rtx cplus_expand_expr PROTO((tree, rtx, enum machine_mode,
enum expand_modifier));
*************** extract_aggr_init (decl, init)
*** 244,249 ****
--- 246,252 ----
return 0;
}
+ #if 0
static tree
extract_scalar_init (decl, init)
tree decl, init;
*************** extract_scalar_init (decl, init)
*** 294,299 ****
--- 297,303 ----
return t;
}
+ #endif
int
extract_init (decl, init)
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/init.c egcs-980307/gcc/cp/init.c
*** egcs-980307.orig/gcc/cp/init.c Thu Mar 5 09:20:48 1998
--- egcs-980307/gcc/cp/init.c Sun Mar 8 15:48:40 1998
*************** expand_aggr_init_1 (binfo, true_exp, exp
*** 1335,1341 ****
int flags;
{
tree type = TREE_TYPE (exp);
- tree init_type = NULL_TREE;
my_friendly_assert (init != error_mark_node && type != error_mark_node, 211);
--- 1335,1340 ----
*************** tree
*** 2212,2218 ****
build_new_1 (exp)
tree exp;
{
! tree placement, init, t;
tree type, true_type, size, rval;
tree nelts = NULL_TREE;
tree alloc_expr, alloc_node = NULL_TREE;
--- 2211,2217 ----
build_new_1 (exp)
tree exp;
{
! tree placement, init;
tree type, true_type, size, rval;
tree nelts = NULL_TREE;
tree alloc_expr, alloc_node = NULL_TREE;
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/pt.c egcs-980307/gcc/cp/pt.c
*** egcs-980307.orig/gcc/cp/pt.c Thu Mar 5 09:20:51 1998
--- egcs-980307/gcc/cp/pt.c Sun Mar 8 12:15:44 1998
*************** instantiate_class_template (type)
*** 3129,3136 ****
/* These will add themselves to CLASSTYPE_TAGS for the new type. */
if (TREE_CODE (tag) == ENUMERAL_TYPE)
{
! tree newtag = tsubst_enum (tag, args, field_chain);
!
while (*field_chain)
{
DECL_FIELD_CONTEXT (*field_chain) = type;
--- 3129,3135 ----
/* These will add themselves to CLASSTYPE_TAGS for the new type. */
if (TREE_CODE (tag) == ENUMERAL_TYPE)
{
! (void) tsubst_enum (tag, args, field_chain);
while (*field_chain)
{
DECL_FIELD_CONTEXT (*field_chain) = type;
*************** do_decl_instantiation (declspecs, declar
*** 5857,5864 ****
tree declspecs, declarator, storage;
{
tree decl = grokdeclarator (declarator, declspecs, NORMAL, 0, NULL_TREE);
- tree name;
- tree fn;
tree result = NULL_TREE;
int extern_p = 0;
--- 5856,5861 ----
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/tree.c egcs-980307/gcc/cp/tree.c
*** egcs-980307.orig/gcc/cp/tree.c Mon Feb 23 18:04:59 1998
--- egcs-980307/gcc/cp/tree.c Sun Mar 8 15:54:11 1998
*************** get_type_decl (t)
*** 1920,1925 ****
--- 1921,1929 ----
return TYPE_STUB_DECL (t);
my_friendly_abort (42);
+
+ /* Stop compiler from complaining control reaches end of non-void function. */
+ return 0;
}
int
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cp/typeck.c egcs-980307/gcc/cp/typeck.c
*** egcs-980307.orig/gcc/cp/typeck.c Thu Mar 5 09:20:56 1998
--- egcs-980307/gcc/cp/typeck.c Sun Mar 8 15:45:52 1998
*************** tree
*** 4899,4906 ****
build_x_conditional_expr (ifexp, op1, op2)
tree ifexp, op1, op2;
{
- tree rval = NULL_TREE;
-
if (processing_template_decl)
return build_min_nt (COND_EXPR, ifexp, op1, op2);
--- 4899,4904 ----
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/cplus-dem.c egcs-980307/gcc/cplus-dem.c
*** egcs-980307.orig/gcc/cplus-dem.c Sat Feb 7 23:58:32 1998
--- egcs-980307/gcc/cplus-dem.c Sun Mar 8 12:34:10 1998
*************** static int
*** 264,270 ****
gnu_special PARAMS ((struct work_stuff *, const char **, string *));
static int
! arm_special PARAMS ((struct work_stuff *, const char **, string *));
static void
string_need PARAMS ((string *, int));
--- 264,270 ----
gnu_special PARAMS ((struct work_stuff *, const char **, string *));
static int
! arm_special PARAMS ((const char **, string *));
static void
string_need PARAMS ((string *, int));
*************** demangle_prefix (work, mangled, declp)
*** 1696,1702 ****
then find the next "__" that separates the prefix from the signature.
*/
if (!(ARM_DEMANGLING || LUCID_DEMANGLING)
! || (arm_special (work, mangled, declp) == 0))
{
while (*scan == '_')
{
--- 1696,1702 ----
then find the next "__" that separates the prefix from the signature.
*/
if (!(ARM_DEMANGLING || LUCID_DEMANGLING)
! || (arm_special (mangled, declp) == 0))
{
while (*scan == '_')
{
*************** LOCAL FUNCTION
*** 1940,1947 ****
SYNOPSIS
static int
! arm_special (struct work_stuff *work, const char **mangled,
! string *declp);
DESCRIPTION
--- 1940,1947 ----
SYNOPSIS
static int
! arm_special (const char **mangled,
! string *declp);
DESCRIPTION
*************** DESCRIPTION
*** 1955,1962 ****
*/
static int
! arm_special (work, mangled, declp)
! struct work_stuff *work;
const char **mangled;
string *declp;
{
--- 1955,1961 ----
*/
static int
! arm_special (mangled, declp)
const char **mangled;
string *declp;
{
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/except.c egcs-980307/gcc/except.c
*** egcs-980307.orig/gcc/except.c Sat Feb 14 21:34:02 1998
--- egcs-980307/gcc/except.c Sun Mar 8 14:45:45 1998
*************** init_eh ()
*** 1790,1796 ****
{
/* Generate rtl to reference the variable in which the PC of the
current context is saved. */
! tree type = build_pointer_type (make_node (VOID_TYPE));
}
/* Initialize the per-function EH information. */
--- 1790,1796 ----
{
/* Generate rtl to reference the variable in which the PC of the
current context is saved. */
! (void) build_pointer_type (make_node (VOID_TYPE));
}
/* Initialize the per-function EH information. */
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/gcc.c egcs-980307/gcc/gcc.c
*** egcs-980307.orig/gcc/gcc.c Sun Mar 1 16:10:04 1998
--- egcs-980307/gcc/gcc.c Sun Mar 8 16:02:53 1998
*************** static void error PROTO(());
*** 259,264 ****
--- 259,268 ----
void fancy_abort ();
char *xmalloc ();
char *xrealloc ();
+
+ #ifdef LANG_SPECIFIC_DRIVER
+ extern void lang_specific_driver PROTO ((void (*) (), int *, char ***));
+ #endif
/* Specs are strings containing lines, each of which (if not blank)
is made up of a program name, and arguments separated by spaces.
*************** static int argbuf_length;
*** 1210,1217 ****
static int argbuf_index;
/* This is the list of suffixes and codes (%g/%u/%U) and the associated
! temp file. Used only if MKTEMP_EACH_FILE. */
static struct temp_name {
char *suffix; /* suffix associated with the code. */
--- 1214,1222 ----
static int argbuf_index;
+ #ifdef MKTEMP_EACH_FILE
/* This is the list of suffixes and codes (%g/%u/%U) and the associated
! temp file. */
static struct temp_name {
char *suffix; /* suffix associated with the code. */
*************** static struct temp_name {
*** 1221,1226 ****
--- 1226,1232 ----
int filename_length; /* strlen (filename). */
struct temp_name *next;
} *temp_names;
+ #endif
/* Number of commands executed so far. */
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genattr.c egcs-980307/gcc/genattr.c
*** egcs-980307.orig/gcc/genattr.c Sun Mar 1 16:10:05 1998
--- egcs-980307/gcc/genattr.c Sun Mar 8 14:32:25 1998
*************** xrealloc (ptr, size)
*** 222,227 ****
--- 222,228 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genattr: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genconfig.c egcs-980307/gcc/genconfig.c
*** egcs-980307.orig/gcc/genconfig.c Sun Mar 1 16:10:08 1998
--- egcs-980307/gcc/genconfig.c Sun Mar 8 14:42:34 1998
*************** xrealloc (ptr, size)
*** 270,275 ****
--- 270,276 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genconfig: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genemit.c egcs-980307/gcc/genemit.c
*** egcs-980307.orig/gcc/genemit.c Sun Mar 1 16:10:09 1998
--- egcs-980307/gcc/genemit.c Sun Mar 8 15:29:41 1998
*************** xrealloc (ptr, size)
*** 701,706 ****
--- 701,707 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genemit: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genextract.c egcs-980307/gcc/genextract.c
*** egcs-980307.orig/gcc/genextract.c Sun Mar 1 16:10:10 1998
--- egcs-980307/gcc/genextract.c Sun Mar 8 15:28:19 1998
*************** xrealloc (ptr, size)
*** 372,377 ****
--- 372,378 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genextract: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genflags.c egcs-980307/gcc/genflags.c
*** egcs-980307.orig/gcc/genflags.c Sun Mar 1 16:10:11 1998
--- egcs-980307/gcc/genflags.c Sun Mar 8 14:40:57 1998
*************** xrealloc (ptr, size)
*** 204,209 ****
--- 204,210 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genflags: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genopinit.c egcs-980307/gcc/genopinit.c
*** egcs-980307.orig/gcc/genopinit.c Sun Mar 1 16:10:12 1998
--- egcs-980307/gcc/genopinit.c Sun Mar 8 15:27:01 1998
*************** xrealloc (ptr, size)
*** 315,320 ****
--- 315,321 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genopinit: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genoutput.c egcs-980307/gcc/genoutput.c
*** egcs-980307.orig/gcc/genoutput.c Sun Mar 1 16:10:13 1998
--- egcs-980307/gcc/genoutput.c Sun Mar 8 11:13:16 1998
*************** output_epilogue ()
*** 242,248 ****
int offset = 0;
int next;
char * last_name = 0;
! char * next_name;
register struct data *n;
for (n = insn_data, next = 1; n; n = n->next, next++)
--- 242,248 ----
int offset = 0;
int next;
char * last_name = 0;
! char * next_name = 0;
register struct data *n;
for (n = insn_data, next = 1; n; n = n->next, next++)
*************** mybcopy (b1, b2, length)
*** 920,925 ****
--- 920,926 ----
static void
fatal (s, a1, a2, a3, a4)
char *s;
+ int a1, a2, a3, a4;
{
fprintf (stderr, "genoutput: ");
fprintf (stderr, s, a1, a2, a3, a4);
*************** fancy_abort ()
*** 939,944 ****
--- 940,946 ----
static void
error (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genoutput: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/genpeep.c egcs-980307/gcc/genpeep.c
*** egcs-980307.orig/gcc/genpeep.c Sun Mar 1 16:10:14 1998
--- egcs-980307/gcc/genpeep.c Sun Mar 8 15:19:40 1998
*************** xrealloc (ptr, size)
*** 414,419 ****
--- 414,420 ----
static void
fatal (s, a1, a2)
char *s;
+ int a1, a2;
{
fprintf (stderr, "genpeep: ");
fprintf (stderr, s, a1, a2);
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/real.c egcs-980307/gcc/real.c
*** egcs-980307.orig/gcc/real.c Sun Nov 2 22:17:51 1997
--- egcs-980307/gcc/real.c Sun Mar 8 15:03:00 1998
*************** static void asctoe113 PROTO((char *, uns
*** 399,409 ****
--- 399,413 ----
static void asctoe PROTO((char *, unsigned EMUSHORT *));
static void asctoeg PROTO((char *, unsigned EMUSHORT *, int));
static void efloor PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
+ #if 0
static void efrexp PROTO((unsigned EMUSHORT *, int *,
unsigned EMUSHORT *));
+ #endif
static void eldexp PROTO((unsigned EMUSHORT *, int, unsigned EMUSHORT *));
+ #if 0
static void eremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *,
unsigned EMUSHORT *));
+ #endif
static void eiremain PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void mtherr PROTO((char *, int));
#ifdef DEC
*************** static void toibm PROTO((unsigned EMUSHO
*** 420,430 ****
--- 424,436 ----
enum machine_mode));
#endif
static void make_nan PROTO((unsigned EMUSHORT *, int, enum machine_mode));
+ #if 0
static void uditoe PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void ditoe PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void etoudi PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void etodi PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
static void esqrt PROTO((unsigned EMUSHORT *, unsigned EMUSHORT *));
+ #endif
/* Copy 32-bit numbers obtained from array containing 16-bit numbers,
swapping ends if required, into output array of longs. The
*************** efloor (x, y)
*** 5308,5313 ****
--- 5314,5320 ----
}
+ #if 0
/* Return S and EXP such that S * 2^EXP = X and .5 <= S < 1.
For example, 1.1 = 0.55 * 2^1. */
*************** efrexp (x, exp, s)
*** 5332,5337 ****
--- 5339,5345 ----
emovo (xi, s);
*exp = (int) (li - 0x3ffe);
}
+ #endif
/* Return e type Y = X * 2^PWR2. */
*************** eldexp (x, pwr2, y)
*** 5354,5359 ****
--- 5362,5368 ----
}
+ #if 0
/* C = remainder after dividing B by A, all e type values.
Least significant integer quotient bits left in EQUOT. */
*************** eremain (a, b, c)
*** 5389,5394 ****
--- 5398,5404 ----
num[0] = 0xffff;
emovo (num, c);
}
+ #endif
/* Return quotient of exploded e-types NUM / DEN in EQUOT,
remainder in NUM. */
*************** ereal_from_double (d)
*** 5955,5960 ****
--- 5965,5971 ----
}
+ #if 0
/* Convert target computer unsigned 64-bit integer to e-type.
The endian-ness of DImode follows the convention for integers,
so we use WORDS_BIG_ENDIAN here, not REAL_WORDS_BIG_ENDIAN. */
*************** esqrt (x, y)
*** 6325,6330 ****
--- 6336,6342 ----
emdnorm (sq, k, 0, exp, 64);
emovo (sq, y);
}
+ #endif
#endif /* EMU_NON_COMPILE not defined */
/* Return the binary precision of the significand for a given
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/reload.c egcs-980307/gcc/reload.c
*** egcs-980307.orig/gcc/reload.c Fri Mar 6 17:13:29 1998
--- egcs-980307/gcc/reload.c Sun Mar 8 15:19:01 1998
*************** static int output_reloadnum;
*** 306,314 ****
--- 306,316 ----
? RELOAD_FOR_OUTADDR_ADDRESS \
: (type)))
+ #ifdef HAVE_SECONDARY_RELOADS
static int push_secondary_reload PROTO((int, rtx, int, int, enum reg_class,
enum machine_mode, enum reload_type,
enum insn_code *));
+ #endif
static enum reg_class find_valid_class PROTO((enum machine_mode, int));
static int push_reload PROTO((rtx, rtx, rtx *, rtx *, enum reg_class,
enum machine_mode, enum machine_mode,
diff -rcp -x CVS -x *.o -x *.info* -x *.html* -x *.elc -x *.dvi -x *.orig -x *~ -x version.el egcs-980307.orig/gcc/varasm.c egcs-980307/gcc/varasm.c
*** egcs-980307.orig/gcc/varasm.c Sun Mar 1 16:10:39 1998
--- egcs-980307/gcc/varasm.c Sun Mar 8 14:57:25 1998
*************** assemble_static_space (size)
*** 1667,1677 ****
--- 1667,1679 ----
char name[12];
char *namestring;
rtx x;
+ #ifndef ASM_OUTPUT_ALIGNED_LOCAL
/* Round size up to multiple of BIGGEST_ALIGNMENT bits
so that each uninitialized object starts on such a boundary. */
int rounded = ((size + (BIGGEST_ALIGNMENT / BITS_PER_UNIT) - 1)
/ (BIGGEST_ALIGNMENT / BITS_PER_UNIT)
* (BIGGEST_ALIGNMENT / BITS_PER_UNIT));
+ #endif
#if 0
if (flag_shared_data)