Mercurial > emacs
changeset 1307:b469633740b3
Fixed typos.
| author | Joseph Arceneaux <jla@gnu.org> |
|---|---|
| date | Fri, 02 Oct 1992 22:33:18 +0000 |
| parents | 01d973b5d81b |
| children | 2660a7053836 |
| files | src/intervals.c |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/intervals.c Fri Oct 02 22:32:00 1992 +0000 +++ b/src/intervals.c Fri Oct 02 22:33:18 1992 +0000 @@ -650,7 +650,7 @@ if (position == i->position && position != 1) { - register prev = previous_interval (i); + register INTERVAL prev = previous_interval (i); /* If both intervals are sticky here, then default to the left-most one. But perhaps we should create a new @@ -662,7 +662,7 @@ while (! NULL_INTERVAL_P (i)) { i->total_length += length; - i = i->parent + i = i->parent; } return tree; @@ -1126,7 +1126,7 @@ { /* The inserted text constitutes the whole buffer, so simply copy over the interval structure. */ - if (BUF_Z (b) == TOTAL_LENGTH (source)) + if (BUF_Z (buffer) == TOTAL_LENGTH (source)) { buffer->intervals = reproduce_tree (source, tree->parent); /* Explicitly free the old tree here. */ @@ -1137,8 +1137,8 @@ /* Create an interval tree in which to place a copy of the intervals of the inserted string. */ { - Lisp_Object buffer; - XSET (buffer, Lisp_Buffer, b); + Lisp_Object buf; + XSET (buf, Lisp_Buffer, buffer); create_root_interval (buffer); } } @@ -1393,7 +1393,7 @@ { register INTERVAL intervals = buf->intervals; register INTERVAL i; - register Lisp_Object hooks = Qnil; + Lisp_Object hooks = Qnil; register prev_mod_hook = Qnil; register Lisp_Object mod_hook; struct gcpro gcpro1;