(module test mzscheme

  (require "../private/require.ss")
  (require-contracts)
  (require-schemeunit)
  
  (require "test-set.ss"
           "test-table.ss")

  (provide/contract
   [test (-> test-suite?)])

  (define (test)
    (make-test-suite
     "Datastructures Galore"
     (test-set)
     (test-table)))

  (define (test/gui)
    ((dynamic-require
      '(planet "graphical-ui.ss" ("schematics" "schemeunit.plt" 1))
      'test/graphical-ui)
     (test)))

  (define (test/text)
    ((dynamic-require
      '(planet "text-ui.ss" ("schematics" "schemeunit.plt" 1))
      'test/text-ui)
     (test)))

  )