8 lines
210 B
Scheme
8 lines
210 B
Scheme
#!r6rs
|
|
(import (tests r6rs arithmetic fixnums)
|
|
(tests r6rs test)
|
|
(rnrs io simple))
|
|
(display "Running tests for (rnrs arithmetic fixnums)\n")
|
|
(run-arithmetic-fixnums-tests)
|
|
(report-test-results)
|