diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-06-16 04:32:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-06-16 04:32:03 +0000 |
| commit | 43c158ed152cfcae012c12059fea2d42344f9997 (patch) | |
| tree | 170feacc8c779e2c793f03d85e78d2b8ea8dadf9 /src/xdisp.c | |
| parent | 7c573adb3bd9d7b43c27493c9bdf10698acbca2c (diff) | |
| download | emacs-43c158ed152cfcae012c12059fea2d42344f9997.tar.gz | |
(message_dolog): GCPRO the oldpoint, oldbegv and oldzv
markers, and old_deactivate_mark.
Diffstat (limited to 'src/xdisp.c')
| -rw-r--r-- | src/xdisp.c | 3 |
1 files changed, 3 insertions, 0 deletions
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); |