changeset 22500:274456e421ab

(message_dolog): GCPRO the oldpoint, oldbegv and oldzv markers, and old_deactivate_mark.
author Richard M. Stallman <rms@gnu.org>
date Tue, 16 Jun 1998 04:32:03 +0000
parents a478a91f3fbb
children d2edb98d0fa5
files src/xdisp.c
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/xdisp.c	Mon Jun 15 22:46:48 1998 +0000
+++ b/src/xdisp.c	Tue Jun 16 04:32:03 1998 +0000
@@ -297,6 +297,7 @@
       int point_at_end = 0;
       int zv_at_end = 0;
       Lisp_Object old_deactivate_mark, tem;
+      struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
 
       old_deactivate_mark = Vdeactivate_mark;
       oldbuf = current_buffer;
@@ -306,6 +307,7 @@
       oldpoint = Fpoint_marker ();
       oldbegv = Fpoint_min_marker ();
       oldzv = Fpoint_max_marker ();
+      GCPRO4 (oldpoint, oldbegv, oldzv, old_deactivate_mark);
 
       if (PT == Z)
 	point_at_end = 1;
@@ -415,6 +417,7 @@
       else
 	Fgoto_char (oldpoint);
 
+      UNGCPRO;
       free_marker (oldpoint);
       free_marker (oldbegv);
       free_marker (oldzv);