[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
ice-9/slib.scm patch
From: |
Clinton Ebadi |
Subject: |
ice-9/slib.scm patch |
Date: |
Fri, 5 Jul 2002 22:03:52 -0400 |
User-agent: |
KMail/1.4.2 |
The ice-9 slib module doesn't work with slib 2d4 because it doesn't define
make-exchanger. This patch adds make-exchanger to ice-9/slib.scm (on a
related note, slib appears to have had a guile.init for over a year; if it
hasn't already been done someone should probably look at guile.init and
ice-9/slib.scm and see ice-9/slib.scm needs to be updated):
*** ice-9/slib.scm.orig Fri Jul 5 21:50:30 2002
--- ice-9/slib.scm Fri Jul 5 21:54:37 2002
***************
*** 51,57 ****
scheme-implementation-type
scheme-implementation-version
make-random-state
! require)
:no-backtrace)
--- 51,58 ----
scheme-implementation-type
scheme-implementation-version
make-random-state
! require
! make-exchanger)
:no-backtrace)
***************
*** 286,288 ****
--- 287,292 ----
(set-cdr! entry path-name)
(set! *catalog*
(acons name path-name *catalog*))))))
+
+ (define (make-exchanger obj)
+ (lambda (rep) (let ((old obj)) (set! obj rep) old)))
--
http://unknownlamer.org
Facts do not cease to exist because they are ignored.
-- Aldous Huxley
Flag Burner.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- ice-9/slib.scm patch,
Clinton Ebadi <=