test-packages.scm 956 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344
  1. ; Random tests, mostly for stuff in scheme/big
  2. (define-structure misc-big-test (export misc-big-tests)
  3. (open scheme test-suites
  4. ;assembler
  5. byte-vectors
  6. ports
  7. queues
  8. random
  9. sort
  10. big-scheme
  11. arrays
  12. dump/restore
  13. search-trees
  14. threads
  15. placeholders
  16. locks
  17. interrupts
  18. mask-types
  19. masks
  20. finite-types
  21. (subset i/o (read-byte))
  22. (subset i/o-internal (open-input-port? eof-object)))
  23. (files (big check)))
  24. (define-structure sockets-test (export tcp-sockets-tests
  25. udp-sockets-tests)
  26. (open scheme test-suites
  27. byte-vectors threads
  28. sockets udp-sockets)
  29. (files (big socket-check)))
  30. (define-structure inversion-lists-test (export inversion-lists-tests)
  31. (open scheme test-suites
  32. inversion-lists)
  33. (files (big inversion-list-check)))
  34. (define-structure big-test (export big-tests)
  35. (open scheme test-suites
  36. misc-big-test inversion-lists-test)
  37. (begin
  38. (define-test-suite big-tests
  39. (misc-big-tests inversion-lists-tests))))