tst.scm 660 B

123456789101112131415161718192021222324252627
  1. ; Copyright (c) 1993-2007 by Richard Kelsey and Jonathan Rees. See file COPYING.
  2. (define-structure primitives (make-compiler-base))
  3. ; "Level 1"
  4. (define-structures ((scheme-level-1 scheme-level-1-interface)
  5. (scheme-level-1-internal scheme-level-1-internal-interface)
  6. (bitwise bitwise-interface)
  7. (util util-interface)
  8. (simple-signals signals-interface)
  9. (features features-interface)
  10. (ascii ascii-interface)
  11. (structure-refs (export structure-ref)))
  12. (open primitives)
  13. (usual-transforms)
  14. (optimize auto-integrate)
  15. (files (rts base)
  16. (rts util)
  17. (rts signal)
  18. (rts number)
  19. (rts lize) ; Rationalize
  20. ))