Mercurial > hg > xemacs-beta
diff src/rangetab.c @ 380:8626e4521993 r21-2-5
Import from CVS: tag r21-2-5
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:07:10 +0200 |
parents | c42ec1d1cded |
children | 74fd4e045ea6 |
line wrap: on
line diff
--- a/src/rangetab.c Mon Aug 13 11:06:08 2007 +0200 +++ b/src/rangetab.c Mon Aug 13 11:07:10 2007 +0200 @@ -47,7 +47,7 @@ int i; for (i = 0; i < Dynarr_length (rt->entries); i++) - (markobj) (Dynarr_at (rt->entries, i).val); + markobj (Dynarr_at (rt->entries, i).val); return Qnil; } @@ -242,15 +242,13 @@ (pos, table, default_)) { struct Lisp_Range_Table *rt; - EMACS_INT po; CHECK_RANGE_TABLE (table); rt = XRANGE_TABLE (table); CHECK_INT_COERCE_CHAR (pos); - po = XINT (pos); - return get_range_table (po, Dynarr_length (rt->entries), + return get_range_table (XINT (pos), Dynarr_length (rt->entries), Dynarr_atp (rt->entries, 0), default_); }