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_);
 }