diff options
| author | michele.simionato <devnull@localhost> | 2009-05-07 15:35:48 +0000 |
|---|---|---|
| committer | michele.simionato <devnull@localhost> | 2009-05-07 15:35:48 +0000 |
| commit | c43d47ea4720e81fb603d79ac5b28d83b6c63da2 (patch) | |
| tree | 4c76944735ca6e98e1b88d9a460ab1ece2b98ae0 /scheme | |
| parent | 4c0f5cde06fb65fffb3e78212f2bf540bd715ad7 (diff) | |
| download | micheles-c43d47ea4720e81fb603d79ac5b28d83b6c63da2.tar.gz | |
Removed a dependency from aps/compat.sls
Diffstat (limited to 'scheme')
| -rw-r--r-- | scheme/experimental/registry.sls | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scheme/experimental/registry.sls b/scheme/experimental/registry.sls index e34c027..c2a0226 100644 --- a/scheme/experimental/registry.sls +++ b/scheme/experimental/registry.sls @@ -1,7 +1,7 @@ #!r6rs (library (experimental registry) (export registry register) -(import (rnrs) (aps compat)) +(import (rnrs)) (define _registry '()) @@ -9,7 +9,7 @@ _registry) (define (register id) - (printf "registering ~a\n" id) + (display "registering ") (display id) (newline) (set! _registry (append _registry (list id))) _registry) |