changeset 10616:a43d97d12de3

[!MULTI_PERDISPLAY] (defvar_display): Use staticpro.
author Karl Heuer <kwzh@gnu.org>
date Tue, 31 Jan 1995 22:32:35 +0000
parents db11ebed6573
children 733088348c66
files src/lread.c
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Tue Jan 31 20:16:07 1995 +0000
+++ b/src/lread.c	Tue Jan 31 22:32:35 1995 +0000
@@ -1921,6 +1921,9 @@
   XMISC (val)->type = Lisp_Misc_Display_Objfwd;
   XDISPLAY_OBJFWD (val)->offset = offset;
   XSYMBOL (sym)->value = val;
+#ifndef MULTI_PERDISPLAY
+  staticpro ((Lisp_Object *)((char *)&the_only_perdisplay + offset));
+#endif
 }
 
 init_lread ()