cxr.sps 185 B

123456789
  1. (import (scheme base)
  2. (scheme write)
  3. (tests scheme cxr)
  4. (tests scheme test))
  5. (display "Running tests for (scheme cxr)\n")
  6. (run-cxr-tests)
  7. (report-test-results)