(type egg)
(signature "testeez egg")
(timestamp 1612269487)
(sxml ((section 2 "Outdated egg!" (p "This is an egg for CHICKEN 4, the unsupported old release.  You're almost certainly looking for " (int-link "/eggref/5/testeez" "the CHICKEN 5 version of this egg") ", if it exists.") (p "If it does not exist, there may be equivalent functionality provided by another egg; have a look at the " (link "https://wiki.call-cc.org/chicken-projects/egg-index-5.html" "egg index") ". Otherwise, please consider porting this egg to the current version of CHICKEN.")) (section 2 "testeez" (p "See http://www.neilvandyke.org/testeez/ for the full documentation.") (toc) (section 3 "Programming interface" (section 4 "testeez" (def (sig (syntax "(testeez docstring . test-expressions)" (id testeez))) (p "where each test-expression is a list consisting of one of the following testing operators, a docstring and one or two other forms."))) (section 4 "test/equal" (def (sig (syntax "(test/equal desc xpr expected)" (id test/equal))) (p "Tests xpr and compares it with equal? to expected.") (p "A shorthand for (test-equal \"\" xpr expected) is also available, simply write (xpr expected)"))) (section 4 "test/eq" (def (sig (syntax "(test/eq desc xpr expected)" (id test/eq))) (p "Tests xpr and compares it with eq? to expected."))) (section 4 "test/eqv" (def (sig (syntax "(test/eqv desc xpr expected)" (id test/eqv))) (p "Tests xpr and compares it with eqv? to expected."))) (section 4 "test-define" (def (sig (syntax "(test-define desc name val)" (id test-define))) (p "Binds name to val.  The binding is visible only to the remainder of a testeez expression."))) (section 4 "test-eval" (def (sig (syntax "(test-eval desc xpr)" (id test-eval)))))) (section 3 "Author" (p "Neil van Dyke")) (section 3 "Licence" (p "LGPL-3")))))
