* removed import of (scheme) from ikarus.chars.ss
This commit is contained in:
parent
adc4869540
commit
891cde0e74
BIN
src/ikarus.boot
BIN
src/ikarus.boot
Binary file not shown.
|
@ -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)
|
||||||
|
|
Loading…
Reference in New Issue