* 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>=? char=? char<? char<=? char>? char>=?
integer->char char->integer integer->char char->integer
char-whitespace? char-alphabetic? char-downcase) char-whitespace? char-alphabetic? char-downcase)
(only (scheme) (ikarus system $pairs)
$car $cdr $fx+ $fx- $fx<= $fx>= $fixnum->char $char->fixnum (ikarus system $chars)
$char= $char< $char<= $char> $char>=)) (ikarus system $fx))
(define integer->char (define integer->char
(lambda (n) (lambda (n)