aboutsummaryrefslogtreecommitdiffstats
path: root/src/intervals.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/intervals.c')
-rw-r--r--src/intervals.c11
1 files changed, 6 insertions, 5 deletions
diff --git a/src/intervals.c b/src/intervals.c
index cb60061fdce..07845f95666 100644
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -1,5 +1,6 @@
1/* Code for doing intervals. 1/* Code for doing intervals.
2 Copyright (C) 1993, 1994, 1995, 1997, 1998, 2002, 2003 Free Software Foundation, Inc. 2 Copyright (C) 1993, 1994, 1995, 1997, 1998, 2002, 2003, 2004,
3 2005 Free Software Foundation, Inc.
3 4
4This file is part of GNU Emacs. 5This file is part of GNU Emacs.
5 6
@@ -790,14 +791,14 @@ update_interval (i, pos)
790 /* Move right. */ 791 /* Move right. */
791 if (pos < INTERVAL_LAST_POS (i) + TOTAL_LENGTH (i->right)) 792 if (pos < INTERVAL_LAST_POS (i) + TOTAL_LENGTH (i->right))
792 { 793 {
793 i->right->position = INTERVAL_LAST_POS (i) + 794 i->right->position = INTERVAL_LAST_POS (i)
794 LEFT_TOTAL_LENGTH (i->right); 795 + LEFT_TOTAL_LENGTH (i->right);
795 i = i->right; /* Move to the right child */ 796 i = i->right; /* Move to the right child */
796 } 797 }
797 else if (NULL_PARENT (i)) 798 else if (NULL_PARENT (i))
798 error ("Point after end of properties"); 799 error ("Point %d after end of properties", pos);
799 else 800 else
800 i = INTERVAL_PARENT (i); 801 i = INTERVAL_PARENT (i);
801 continue; 802 continue;
802 } 803 }
803 else 804 else