Tell the user what test is being performed.

This commit is contained in:
Richard Levitte 2010-11-18 22:47:01 +00:00
parent c09d1df7d3
commit 2d96a30dc7

View File

@ -77,6 +77,7 @@ $ loop_tests:
$ tests_e = f$element(tests_i,",",tests) $ tests_e = f$element(tests_i,",",tests)
$ tests_i = tests_i + 1 $ tests_i = tests_i + 1
$ if tests_e .eqs. "," then goto exit $ if tests_e .eqs. "," then goto exit
$ write sys$output "---> ''tests_e'"
$ gosub 'tests_e' $ gosub 'tests_e'
$ goto loop_tests $ goto loop_tests
$ $