comparison src/indent.c @ 2506:8c96bdabcaf9

[xemacs-hg @ 2005-01-26 05:11:01 by ben] implement next-single-char-property-change and friends extents.c, extents.h, indent.c, syntax.c: Implement next/previous-single-char-property-change and make next/previous-single-property-change work like in FSF.
author ben
date Wed, 26 Jan 2005 05:11:12 +0000
parents fffe735e63ee
children facf3239ba30
comparison
equal deleted inserted replaced
2505:3e5a2d0d57e1 2506:8c96bdabcaf9
69 { 69 {
70 Lisp_Object buffer; 70 Lisp_Object buffer;
71 Lisp_Object value; 71 Lisp_Object value;
72 72
73 buffer = wrap_buffer (buf); 73 buffer = wrap_buffer (buf);
74 value = Fprevious_single_property_change (make_int (pos), Qinvisible, 74 value = Fprevious_single_char_property_change (make_int (pos), Qinvisible,
75 buffer, Qnil); 75 buffer, Qnil);
76 if (NILP (value)) 76 if (NILP (value))
77 return 0; /* no visible position found */ 77 return 0; /* no visible position found */
78 else 78 else
79 /* #### bug bug bug!!! This will return the position of the beginning 79 /* #### bug bug bug!!! This will return the position of the beginning
80 of an invisible extent; this extent is very likely to be start-closed, 80 of an invisible extent; this extent is very likely to be start-closed,