t2

/* rexx unit test framework

   concatenate these files:

   t1 test-script t2 rexx-file-to-test t3 > t.rexx

   then execute t.rexx

   this file is t2
*/

/* display the test results */

say divider
say contextdesc
say spacer

do i = 1 to checkresult.0
    say checkresult.i
end    

say spacer

text = counts()
do i = 1 to text.0
    say text.i
end

say divider

exit