Mercurial > emacs

changeset 4962:99edf052bfa0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Include puresize.h. (create_root_interval): Check to see if PARENT is in pure memory. If so, we cannot write it.
author Richard M. Stallman <rms@gnu.org>
date Wed, 10 Nov 1993 20:11:44 +0000
parents dd67510308ae
children 6648ce61e9fd
files src/intervals.c
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/intervals.c	Wed Nov 10 20:09:54 1993 +0000
+++ b/src/intervals.c	Wed Nov 10 20:11:44 1993 +0000
@@ -42,6 +42,7 @@
 #include "lisp.h"
 #include "intervals.h"
 #include "buffer.h"
+#include "puresize.h"
 
 /* The rest of the file is within this conditional.  */
 #ifdef USE_TEXT_PROPERTIES
@@ -58,7 +59,11 @@
 create_root_interval (parent)
      Lisp_Object parent;
 {
-  INTERVAL new = make_interval ();
+  INTERVAL new;
+
+  CHECK_IMPURE (parent);
+
+  new = make_interval ();
 
   if (XTYPE (parent) == Lisp_Buffer)
     {