Parent Directory | Revision Log | Patch
revision 1.32.2.1 by mdj, Thu Oct 18 19:41:08 2001 UTC | revision 1.32.2.2 by mvo, Mon Jul 8 20:53:43 2002 UTC | |
---|---|---|
# | Line 286 no other easy or unambiguous way of dete | Line 286 no other easy or unambiguous way of dete |
286 | (set-cdr! entry path-name) | (set-cdr! entry path-name) |
287 | (set! *catalog* | (set! *catalog* |
288 | (acons name path-name *catalog*)))))) | (acons name path-name *catalog*)))))) |
289 | ||
290 | (define (make-exchanger obj) | |
291 | (lambda (rep) (let ((old obj)) (set! obj rep) old))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |