I think this is a bug.

--- guile-core/libguile/goops.c.~1.13.~ Thu Jan 11 16:03:18 2001
+++ guile-core/libguile/goops.c Wed Jan 24 19:19:36 2001
@@ -378,7 +378,7 @@
 
   SCM_ASSERT (SCM_KEYWORDP (key), key, SCM_ARG1, FUNC_NAME);
   len = scm_ilength (l);
-  if (len < 0 || len % 1 == 1)
+  if (len < 0 || len % 2 == 1)
     scm_misc_error (FUNC_NAME, "Bad keyword-value list: ~S", SCM_LIST1 (l));
 
   return scm_i_get_keyword (key, l, len, default_value, FUNC_NAME);

_______________________________________________
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile

Reply via email to