[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Chicken-users] s11n among different chicken versions
From: |
Daishi Kato |
Subject: |
Re: [Chicken-users] s11n among different chicken versions |
Date: |
Mon, 7 Aug 2006 17:18:08 +0900 |
felix,
Should this be a bug?
Daishi
Index: s11n/s11n.scm
===================================================================
--- s11n/s11n.scm (revision 1371)
+++ s11n/s11n.scm (working copy)
@@ -237,6 +237,7 @@
(cond ((##core#inline "set_procedure_ptr" x
(##sys#make-c-string id))
(fetchslots x 1) )
(fallback
+ (fetch)
(let ((proc (fallback id)))
(vector-set! backrefs r proc)
proc) )