This is the mail archive of the
kawa@sources.redhat.com
mailing list for the Kawa project.
Re: definition of a vector-append function is rejected
- From: Per Bothner <per at bothner dot com>
- To: Sven Hartrumpf <Sven dot Hartrumpf at FernUni-Hagen dot de>
- Cc: kawa at sources dot redhat dot com
- Date: Sun, 01 Jun 2003 09:58:25 -0700
- Subject: Re: definition of a vector-append function is rejected
- References: <20030601.151707.74749831.Sven.Hartrumpf@FernUni-Hagen.de>
Sven Hartrumpf wrote:
#|kawa:1|# (load "kawabug5.scm")
gnu.mapping.UnboundSymbol: Unbound symbol vector-append - no field vector$Mnappend in kawa.standard.vector_append
It looks as if one cannot redefine vector-append.
1. Is this intended?
2. If so, should I use
(cond-expand ((not kawa) ...
around my function definition(s)?
(My programs have to run under many different Scheme systems.)
The problem is not the redefinition, but that it wasn't properly
defined in the first place ...
I've checked in the attached patch.
--
--Per Bothner
per@bothner.com http://per.bothner.com/
Index: kawa/standard/Scheme.java
===================================================================
RCS file: /cvs/kawa/kawa/kawa/standard/Scheme.java,v
retrieving revision 1.136
diff -u -r1.136 Scheme.java
--- kawa/standard/Scheme.java 31 May 2003 18:27:31 -0000 1.136
+++ kawa/standard/Scheme.java 1 Jun 2003 16:50:51 -0000
@@ -321,7 +321,7 @@
define_field("vector->list", "kawa.lib.vectors");
define_proc ("vector-fill!", "kawa.lib.vectors");
// Extension:
- define_field("vector-append", "kawa.standard.vector_append");
+ define_field("vector-append", "kawa.standard.vector_append", "vectorAppend");
define_proc ("values-append", "gnu.kawa.functions.AppendValues");
//-- Section 6.9 -- complete [except restricted call/cc]