.\" start test
.de test
. nr t +1
. tmc test \\nt (\\$*):
..
.
.\" make assertion
.de assert
.ie \\$1 \{\
. tm1 "	success
.\}
.el \{\
. tm1 "	failure: \\$1
. nr f +1
.\}
..
.\" end tests
.de end
. ie \\nf=0 .tm ** \\nt test(s) finished successfully **
. el \{
.  ab !! \\nf test(s) failed !!
. \}
..
.