diff options
| author | Richard M. Stallman | 1998-05-11 01:14:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-11 01:14:36 +0000 |
| commit | b69f979760fd5cabff5eb36171aefae3f933be2c (patch) | |
| tree | cb0c0f64097b28b415fdae0133607f33c048a6f6 /src/buffer.c | |
| parent | 7693a579bda7d7d158e5e9ed056800039efa61a3 (diff) | |
| download | emacs-b69f979760fd5cabff5eb36171aefae3f933be2c.tar.gz emacs-b69f979760fd5cabff5eb36171aefae3f933be2c.zip | |
(Fset_buffer_multibyte): Error if marker is put
on buffer's marker-chain while we have temporarily put nil there.
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/buffer.c b/src/buffer.c index e781d25646c..70cb13a9b75 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1822,6 +1822,12 @@ but the contents viewed as characters do change.") | |||
| 1822 | 1822 | ||
| 1823 | tail = XMARKER (tail)->chain; | 1823 | tail = XMARKER (tail)->chain; |
| 1824 | } | 1824 | } |
| 1825 | |||
| 1826 | /* Make sure no markers were put on the chain | ||
| 1827 | while the chain value was incorrect. */ | ||
| 1828 | if (! EQ (BUF_MARKERS (current_buffer), Qnil)) | ||
| 1829 | abort (); | ||
| 1830 | |||
| 1825 | BUF_MARKERS (current_buffer) = markers; | 1831 | BUF_MARKERS (current_buffer) = markers; |
| 1826 | 1832 | ||
| 1827 | /* Do this last, so it can calculate the new correspondences | 1833 | /* Do this last, so it can calculate the new correspondences |