Mercurial > hg > xemacs-beta

comparison src/rangetab.c @ 4713:312503644bc3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Correct the docstring for #'range-table-type. src/ChangeLog addition: 2009-10-10 Aidan Kehoe <kehoea@parhasard.net> * rangetab.c (Frange_table_type): Correct the docstring for this function, don't reuse that of Frange_table_p.
author Aidan Kehoe <kehoea@parhasard.net>
date Sat, 10 Oct 2009 15:04:59 +0100
parents 257b468bf2ca
children 2e15c29cc2b3 e0db3c197671
comparison
equal deleted inserted replaced
4712:a46d7513a364 4713:312503644bc3
288 { 288 {
289 return RANGE_TABLEP (object) ? Qt : Qnil; 289 return RANGE_TABLEP (object) ? Qt : Qnil;
290 } 290 }
291 291
292 DEFUN ("range-table-type", Frange_table_type, 1, 1, 0, /* 292 DEFUN ("range-table-type", Frange_table_type, 1, 1, 0, /*
293 Return non-nil if OBJECT is a range table. 293 Return the type of RANGE-TABLE.
294
295 This will be a symbol describing how ranges in RANGE-TABLE function at their
296 ends; see `make-range-table'.
294 */ 297 */
295 (range_table)) 298 (range_table))
296 { 299 {
297 CHECK_RANGE_TABLE (range_table); 300 CHECK_RANGE_TABLE (range_table);
298 return range_table_type_to_symbol (XRANGE_TABLE (range_table)->type); 301 return range_table_type_to_symbol (XRANGE_TABLE (range_table)->type);