mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 21:59:17 +02:00
Adding (features) procedure.
This commit is contained in:
parent
94ef945f8d
commit
47b88c850f
2 changed files with 3 additions and 1 deletions
|
@ -23,7 +23,7 @@
|
||||||
define-record-type define-syntax define-values denominator do
|
define-record-type define-syntax define-values denominator do
|
||||||
dynamic-wind else eof-object? eq? equal? eqv? error
|
dynamic-wind else eof-object? eq? equal? eqv? error
|
||||||
error-object-irritants error-object-message error-object? even?
|
error-object-irritants error-object-message error-object? even?
|
||||||
exact exact-integer-sqrt exact-integer? exact? expt floor
|
exact exact-integer-sqrt exact-integer? exact? expt features floor
|
||||||
flush-output-port for-each gcd get-output-bytevector get-output-string
|
flush-output-port for-each gcd get-output-bytevector get-output-string
|
||||||
guard if import inexact inexact? input-port? integer->char
|
guard if import inexact inexact? input-port? integer->char
|
||||||
integer? lambda lcm length let let* let*-values let-syntax let-values
|
integer? lambda lcm length let let* let*-values let-syntax let-values
|
||||||
|
|
|
@ -1,4 +1,6 @@
|
||||||
|
|
||||||
|
(define (features) *features*)
|
||||||
|
|
||||||
(define exact inexact->exact)
|
(define exact inexact->exact)
|
||||||
(define inexact exact->inexact)
|
(define inexact exact->inexact)
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue