From 43c158ed152cfcae012c12059fea2d42344f9997 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 16 Jun 1998 04:32:03 +0000 Subject: [PATCH] (message_dolog): GCPRO the oldpoint, oldbegv and oldzv markers, and old_deactivate_mark. --- src/xdisp.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/xdisp.c b/src/xdisp.c index 4b87ffba4a9..365b172c8a4 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -297,6 +297,7 @@ message_dolog (m, len, nlflag, multibyte) 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 @@ message_dolog (m, len, nlflag, multibyte) 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 @@ message_dolog (m, len, nlflag, multibyte) else Fgoto_char (oldpoint); + UNGCPRO; free_marker (oldpoint); free_marker (oldbegv); free_marker (oldzv); -- 2.39.5