diff options
Diffstat (limited to 'src/intervals.c')
| -rw-r--r-- | src/intervals.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/intervals.c b/src/intervals.c index 85152c58a5d..136dc539a74 100644 --- a/src/intervals.c +++ b/src/intervals.c | |||
| @@ -44,7 +44,6 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */ | |||
| 44 | #include "lisp.h" | 44 | #include "lisp.h" |
| 45 | #include "intervals.h" | 45 | #include "intervals.h" |
| 46 | #include "buffer.h" | 46 | #include "buffer.h" |
| 47 | #include "puresize.h" | ||
| 48 | #include "keymap.h" | 47 | #include "keymap.h" |
| 49 | 48 | ||
| 50 | /* Test for membership, allowing for t (actually any non-cons) to mean the | 49 | /* Test for membership, allowing for t (actually any non-cons) to mean the |
| @@ -101,7 +100,6 @@ create_root_interval (Lisp_Object parent) | |||
| 101 | } | 100 | } |
| 102 | else | 101 | else |
| 103 | { | 102 | { |
| 104 | CHECK_IMPURE (parent, XSTRING (parent)); | ||
| 105 | new->total_length = SCHARS (parent); | 103 | new->total_length = SCHARS (parent); |
| 106 | eassert (TOTAL_LENGTH (new) >= 0); | 104 | eassert (TOTAL_LENGTH (new) >= 0); |
| 107 | set_string_intervals (parent, new); | 105 | set_string_intervals (parent, new); |