[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
a bug in goops.c
From: |
Keisuke Nishida |
Subject: |
a bug in goops.c |
Date: |
Thu, 25 Jan 2001 16:40:21 -0500 |
User-agent: |
Wanderlust/2.4.0 (Rio) SEMI/1.13.7 (Awazu) FLIM/1.13.2 (Kasanui) Emacs/21.0.95 (i686-pc-linux-gnu) MULE/5.0 (SAKAKI) |
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);
- a bug in goops.c,
Keisuke Nishida <=