run-tests.ss
#lang scheme

(require (prefix-in main: "test-main.ss"))
(require (prefix-in pro: "test-procedural.ss"))

(require (planet schematics/schemeunit/text-ui)) 

(begin
  (display "Normal interface, produces platform specific bytecode. No gcc needed if you have the right bytecode.\n")
  (display "-----------------------------------------------------------\n")
  (run-tests main:tests 'verbose)
  (display "\nProcedural interface, can pass variables to sizeof. Probably shouldn't use.\n")
  (display "-----------------------------------------------------------\n")
  (run-tests pro:tests 'verbose)
  (void))