* removed import of (scheme) from ikarus.chars.ss

This commit is contained in:
Abdulaziz Ghuloum 2007-05-06 17:58:34 -04:00
parent adc4869540
commit 891cde0e74
2 changed files with 3 additions and 3 deletions

Binary file not shown.

View File

@ -8,9 +8,9 @@
char=? char<? char<=? char>? char>=?
integer->char char->integer
char-whitespace? char-alphabetic? char-downcase)
(only (scheme)
$car $cdr $fx+ $fx- $fx<= $fx>= $fixnum->char $char->fixnum
$char= $char< $char<= $char> $char>=))
(ikarus system $pairs)
(ikarus system $chars)
(ikarus system $fx))
(define integer->char
(lambda (n)