Move testing lisp to separate file
parent
7dfe4ee057
commit
ecae424344
@ -0,0 +1,16 @@
|
||||
%(
|
||||
(set x "deez")
|
||||
(set y "deez")
|
||||
(set z "nuts")
|
||||
(testWrapper
|
||||
(testSet "assertTrue"
|
||||
(assertTrue "assertTrue success" (equals 1 1))
|
||||
(assertTrue "assertTrue fail" (equals 1 0))
|
||||
(assertTrue "assertTrue success with strings" (equals (x) "deez")))
|
||||
(testSet "assertEquals"
|
||||
(assertEquals "assertEquals success" (x) (y))
|
||||
(assertEquals "assertEquals failure" (x) (z)))
|
||||
(testSet "Miscellaneous"
|
||||
(assertTrue "libBasic comparison functions" (== (x) (y))))
|
||||
)
|
||||
)
|
Loading…
Reference in new issue