mirror of
https://github.com/edeproject/ede.git
synced 2023-08-10 21:13:03 +03:00
23 lines
605 B
Scheme
23 lines
605 B
Scheme
|
;;
|
||
|
|
;; main unittest driver for capone
|
||
|
|
;;
|
||
|
|
|
||
|
|
;; Since 'utest.ss' is included here first, before
|
||
|
|
;; code that calls functions from it, the same code does
|
||
|
|
;; not need to include it again.
|
||
|
|
;;
|
||
|
|
;; Otherwise, global counter in 'utest.ss' will be set to
|
||
|
|
;; empty list within each call and that is what we do not want
|
||
|
|
(load "utest.ss")
|
||
|
|
(load "math.ss")
|
||
|
|
(load "string.ss")
|
||
|
|
|
||
|
|
(ut-println "")
|
||
|
|
(ut-println " =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=")
|
||
|
|
(ut-println " Capone Test Suite From Hell ")
|
||
|
|
(ut-println " Ready to smack that CPU? ")
|
||
|
|
(ut-println " =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=")
|
||
|
|
(ut-println "")
|
||
|
|
|
||
|
|
(ut-run-all)
|