compiler patches for HOST_WIDE_INT = long long
John Carr
jfc@mit.edu
Sun Feb 8 05:39:00 GMT 1998
I have been building egcs with HOST_WIDE_INT defined as long long.
Here is another set of patches to make this work better.
Sun Feb 8 08:02:13 1998 John Carr <jfc@mit.edu>
* bitmap.c (bitmap_debug_file): HOST_PTR_PRINTF converts a pointer,
not a HOST_WIDE_INT.
* calls.c (expand_call): Change test of expand_inline_function
return value to stop compiler warning.
* genattrtab.c (RTL_HASH): Cast pointer to long, not HOST_WIDE_INT.
*** bitmap.c.egcs Sat Dec 20 06:31:11 1997
--- bitmap.c Sun Feb 8 08:01:32 1998
***************
*** 563,571 ****
bitmap_element *ptr;
fprintf (file, "\nfirst = ");
! fprintf (file, HOST_PTR_PRINTF, (HOST_WIDE_INT) head->first);
fprintf (file, " current = ");
! fprintf (file, HOST_PTR_PRINTF, (HOST_WIDE_INT) head->current);
fprintf (file, " indx = %u\n", head->indx);
for (ptr = head->first; ptr; ptr = ptr->next)
--- 563,571 ----
bitmap_element *ptr;
fprintf (file, "\nfirst = ");
! fprintf (file, HOST_PTR_PRINTF, head->first);
fprintf (file, " current = ");
! fprintf (file, HOST_PTR_PRINTF, head->current);
fprintf (file, " indx = %u\n", head->indx);
for (ptr = head->first; ptr; ptr = ptr->next)
***************
*** 573,583 ****
int i, j, col = 26;
fprintf (file, "\t");
! fprintf (file, HOST_PTR_PRINTF, (HOST_WIDE_INT) ptr);
fprintf (file, " next = ");
! fprintf (file, HOST_PTR_PRINTF, (HOST_WIDE_INT) ptr->next);
fprintf (file, " prev = ");
! fprintf (file, HOST_PTR_PRINTF, (HOST_WIDE_INT) ptr->prev);
fprintf (file, " indx = %u\n\t\tbits = {", ptr->indx);
for (i = 0; i < BITMAP_ELEMENT_WORDS; i++)
--- 573,583 ----
int i, j, col = 26;
fprintf (file, "\t");
! fprintf (file, HOST_PTR_PRINTF, ptr);
fprintf (file, " next = ");
! fprintf (file, HOST_PTR_PRINTF, ptr->next);
fprintf (file, " prev = ");
! fprintf (file, HOST_PTR_PRINTF, ptr->prev);
fprintf (file, " indx = %u\n\t\tbits = {", ptr->indx);
for (i = 0; i < BITMAP_ELEMENT_WORDS; i++)
*** calls.c.egcs Sun Feb 8 07:44:02 1998
--- calls.c Sun Feb 8 08:00:08 1998
***************
*** 730,736 ****
structure_value_addr);
/* If inlining succeeded, return. */
! if ((HOST_WIDE_INT) temp != -1)
{
#ifdef ACCUMULATE_OUTGOING_ARGS
/* If the outgoing argument list must be preserved, push
--- 730,736 ----
structure_value_addr);
/* If inlining succeeded, return. */
! if (temp != (rtx) (HOST_WIDE_INT) -1)
{
#ifdef ACCUMULATE_OUTGOING_ARGS
/* If the outgoing argument list must be preserved, push
*** genattrtab.c.egcs Sun Feb 8 07:44:04 1998
--- genattrtab.c Sun Feb 8 08:05:36 1998
***************
*** 506,512 ****
/* Here is how primitive or already-shared RTL's hash
codes are made. */
! #define RTL_HASH(RTL) ((HOST_WIDE_INT) (RTL) & 0777777)
/* Add an entry to the hash table for RTL with hash code HASHCODE. */
--- 506,512 ----
/* Here is how primitive or already-shared RTL's hash
codes are made. */
! #define RTL_HASH(RTL) ((long) (RTL) & 0777777)
/* Add an entry to the hash table for RTL with hash code HASHCODE. */
More information about the Gcc
mailing list