(for-each load
  '("r5rs.scm" "sllgen.scm" "define-datatype.scm"
     "test-harness.scm" "test-suite.scm"))