Mercurial > hg > xemacs-beta
changeset 619:8d7292eb4a18
[xemacs-hg @ 2001-06-19 01:35:35 by ben]
dumper.c: wrap_record_1 -> wrap_pointer_1.
| author | ben |
|---|---|
| date | Tue, 19 Jun 2001 01:35:38 +0000 |
| parents | 16ff693bd768 |
| children | 5af4f6f788c4 |
| files | src/ChangeLog src/dumper.c |
| diffstat | 2 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Jun 19 01:29:37 2001 +0000 +++ b/src/ChangeLog Tue Jun 19 01:35:38 2001 +0000 @@ -1,3 +1,9 @@ +2001-06-18 Ben Wing <ben@xemacs.org> + + * dumper.c (pdump_dump_root_objects): + * dumper.c (pdump_load_finish): + wrap_record_1 -> wrap_pointer_1. + 2001-06-18 Ben Wing <ben@xemacs.org> * window.c:
--- a/src/dumper.c Tue Jun 19 01:29:37 2001 +0000 +++ b/src/dumper.c Tue Jun 19 01:35:38 2001 +0000 @@ -934,8 +934,8 @@ obj.value = * obj.address; if (POINTER_TYPE_P (XTYPE (obj.value))) - obj.value = wrap_record_1 ((void *) - pdump_get_entry (XRECORD_LHEADER + obj.value = + wrap_pointer_1 ((void *) pdump_get_entry (XRECORD_LHEADER (obj.value))->save_offset); PDUMP_WRITE (pdump_static_Lisp_Object, obj); @@ -962,7 +962,7 @@ obj.value = *(Lisp_Object *)(desc[pos].offset + (char *)(XRECORD_LHEADER (obj.value))); } - obj.value = wrap_record_1 ((void *) elt->save_offset); + obj.value = wrap_pointer_1 ((void *) elt->save_offset); PDUMP_WRITE (pdump_static_Lisp_Object, obj); } @@ -1149,7 +1149,7 @@ pdump_static_Lisp_Object obj = PDUMP_READ (p, pdump_static_Lisp_Object); if (POINTER_TYPE_P (XTYPE (obj.value))) - obj.value = wrap_record_1 ((char *) XPNTR (obj.value) + delta); + obj.value = wrap_pointer_1 ((char *) XPNTR (obj.value) + delta); (* obj.address) = obj.value; }