parent
4b97ccd71a
commit
99164b32f3
@ -0,0 +1,13 @@
|
|||||||
|
#lang racket
|
||||||
|
|
||||||
|
(require rackunit "tbd.rkt")
|
||||||
|
|
||||||
|
(define hw-tests
|
||||||
|
(test-suite "scheme unit tests"
|
||||||
|
|
||||||
|
(test-case "test fail"
|
||||||
|
(begin
|
||||||
|
(check-equal? 3 4)))))
|
||||||
|
|
||||||
|
(require rackunit/gui)
|
||||||
|
(test/gui hw-tests)
|
Loading…
Reference in new issue