comparison src/dumper.c @ 3103:503174cac05a

[xemacs-hg @ 2005-11-28 15:44:04 by stephent] Move comment to where it apparently belongs. <87br04ye45.fsf@tleepslib.sk.tsukuba.ac.jp
author stephent
date Mon, 28 Nov 2005 15:44:06 +0000
parents 141c2920ea48
children d674024a8674
comparison
equal deleted inserted replaced
3102:a05d78a1685f 3103:503174cac05a
1670 1670
1671 PDUMP_ALIGN_OUTPUT (pdump_cv_data_dump_info); 1671 PDUMP_ALIGN_OUTPUT (pdump_cv_data_dump_info);
1672 retry_fwrite (data, sizeof (pdump_cv_data_dump_info), count, pdump_out); 1672 retry_fwrite (data, sizeof (pdump_cv_data_dump_info), count, pdump_out);
1673 } 1673 }
1674 1674
1675 static void
1676 pdump_dump_cv_ptr_info (void)
1677 {
1678 int i;
1679 Elemcount count = Dynarr_length (pdump_cv_ptr);
1680 pdump_cv_ptr_dump_info *data = alloca_array (pdump_cv_ptr_dump_info, count);
1681 for (i = 0; i < count; i++)
1682 {
1683 data[i].save_offset = Dynarr_at (pdump_cv_ptr, i).save_offset;
1684 data[i].size = Dynarr_at (pdump_cv_ptr, i).size;
1685 }
1686
1687 PDUMP_ALIGN_OUTPUT (pdump_cv_ptr_dump_info);
1688 retry_fwrite (data, sizeof (pdump_cv_ptr_dump_info), count, pdump_out);
1689 }
1690
1675 /* Dump out the root block pointers, part of stage 3 (the "WRITE" stage) of 1691 /* Dump out the root block pointers, part of stage 3 (the "WRITE" stage) of
1676 dumping. For each pointer we dump out a structure containing the 1692 dumping. For each pointer we dump out a structure containing the
1677 location of the pointer and its value, replaced by the appropriate 1693 location of the pointer and its value, replaced by the appropriate
1678 offset into the dumped data. */ 1694 offset into the dumped data. */
1679
1680 static void
1681 pdump_dump_cv_ptr_info (void)
1682 {
1683 int i;
1684 Elemcount count = Dynarr_length (pdump_cv_ptr);
1685 pdump_cv_ptr_dump_info *data = alloca_array (pdump_cv_ptr_dump_info, count);
1686 for (i = 0; i < count; i++)
1687 {
1688 data[i].save_offset = Dynarr_at (pdump_cv_ptr, i).save_offset;
1689 data[i].size = Dynarr_at (pdump_cv_ptr, i).size;
1690 }
1691
1692 PDUMP_ALIGN_OUTPUT (pdump_cv_ptr_dump_info);
1693 retry_fwrite (data, sizeof (pdump_cv_ptr_dump_info), count, pdump_out);
1694 }
1695 1695
1696 static void 1696 static void
1697 pdump_dump_root_block_ptrs (void) 1697 pdump_dump_root_block_ptrs (void)
1698 { 1698 {
1699 int i; 1699 int i;