summaryrefslogtreecommitdiff
path: root/src/lread.c
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1995-01-31 22:32:35 +0000
committerKarl Heuer <kwzh@gnu.org>1995-01-31 22:32:35 +0000
commit9ff285fd37aa4a95af0e96dc38cf85efcc2476fa (patch)
treeca2263065d746263ed8a3bd13201d307934bffe2 /src/lread.c
parentfa09b2f50172332ef15af7c8169cd7cd053effaa (diff)
downloademacs-9ff285fd37aa4a95af0e96dc38cf85efcc2476fa.tar.gz
[!MULTI_PERDISPLAY] (defvar_display): Use staticpro.
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lread.c b/src/lread.c
index ad8ba2a9838..715fe23c7ad 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1921,6 +1921,9 @@ defvar_display (namestring, offset)
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 ()