ggc-zone.c (ggc_pch_write_object): Calculate object size using ggc_get_size (which...

2003-12-01  Daniel Berlin  <dberlin@dberlin.org>

	* ggc-zone.c (ggc_pch_write_object): Calculate object size using
	ggc_get_size (which accounts for large objects properly).

From-SVN: r74114

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index fbfad2b250cb9e3ddf5b28f1b751217b1b6fd859..c9f29da8e642f408b385a305c5c341daa3fa79dd 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-01  Daniel Berlin  <dberlin@dberlin.org>
+       
+       * ggc-zone.c (ggc_pch_write_object): Calculate object size using
+       ggc_get_size (which accounts for large objects properly).
+
 2003-12-01  Jeff Sturm  <jsturm@one-point.com>
 
        PR optimization/13024

diff --git a/gcc/ggc-zone.c b/gcc/ggc-zone.c
index dbca7614a8b0cc1d9d1a7e000a0f67f94b60a0db..d9c82e6c696ab96ce777c5c7b09b0fa5c3e4ab43 100644 (file)
--- a/gcc/ggc-zone.c
+++ b/gcc/ggc-zone.c
@@ -1663,7 +1663,7 @@ ggc_pch_write_object (struct ggc_pch_data *d ATTRIBUTE_UNUSED,
   if (!is_string)
     {
       struct alloc_chunk *chunk = (struct alloc_chunk *) ((char *)x - CHUNK_OVERHEAD);
-      size = chunk->size;
+      size = ggc_get_size (x);
       if (fwrite (chunk, size + CHUNK_OVERHEAD, 1, f) != 1)
        fatal_error ("can't write PCH file: %m");
       d->written += size + CHUNK_OVERHEAD;