@@ -18,58 +18,58 @@ echo # =============================
1818echo # Error Tests
1919echo # =============================
2020
21- if .%2 == . goto usage
22- set PRG = %1
23- set ERRLOG = %2
21+ if .%1 == . goto usage
22+ set WMK = %1
23+ set ERRLOG = ..\error.out
2424
2525set TEST = 03
2626head err%TEST% -3
27- %PRG % " -." > tmp%TEST% a.lst 2 >& 1
27+ %WMK % " -." > tmp%TEST% a.lst 2 >& 1
2828egrep Error tmp%TEST% a.lst > test%TEST% a.lst
2929diff err%TEST% a.chk test%TEST% a.lst
3030call :result a
3131
32- %PRG % " - " > tmp%TEST% b.lst 2 >& 1
32+ %WMK % " - " > tmp%TEST% b.lst 2 >& 1
3333egrep Error tmp%TEST% b.lst > test%TEST% b.lst
3434diff -b err%TEST% b.chk test%TEST% b.lst
3535call :result b
3636
3737set TEST = 04
3838head err%TEST% -3
39- %PRG % -f > tmp%TEST% .lst 2 >& 1
39+ %WMK % -f > tmp%TEST% .lst 2 >& 1
4040egrep Error tmp%TEST% .lst > test%TEST% .lst
4141diff err%TEST% .chk test%TEST% .lst
4242call :result
4343
4444set TEST = 13
4545head err%TEST% -3
46- %PRG % -h " -" 2 > test%TEST% .lst
47- %PRG % -h - 2 >> test%TEST% .lst
48- %PRG % -h " -\" 2 >> test%TEST% .lst
46+ %WMK % -h " -" 2 > test%TEST% .lst
47+ %WMK % -h - 2 >> test%TEST% .lst
48+ %WMK % -h " -\" 2 >> test%TEST% .lst
4949diff err%TEST% .chk test%TEST% .lst
5050call :result
5151
5252set TEST = 17
5353head err%TEST% -3
54- %PRG % -h -f err%TEST% a > test%TEST% .lst 2 >& 1
55- %PRG % -h -f err%TEST% b >> test%TEST% .lst 2 >& 1
56- %PRG % -h -f err%TEST% c >> test%TEST% .lst 2 >& 1
57- %PRG % -h -f err%TEST% d >> test%TEST% .lst 2 >& 1
58- %PRG % -h -f err%TEST% e >> test%TEST% .lst 2 >& 1
59- %PRG % -h -f err%TEST% f >> test%TEST% .lst 2 >& 1
54+ %WMK % -h -f err%TEST% a > test%TEST% .lst 2 >& 1
55+ %WMK % -h -f err%TEST% b >> test%TEST% .lst 2 >& 1
56+ %WMK % -h -f err%TEST% c >> test%TEST% .lst 2 >& 1
57+ %WMK % -h -f err%TEST% d >> test%TEST% .lst 2 >& 1
58+ %WMK % -h -f err%TEST% e >> test%TEST% .lst 2 >& 1
59+ %WMK % -h -f err%TEST% f >> test%TEST% .lst 2 >& 1
6060diff -i err%TEST% .chk test%TEST% .lst
6161call :result
6262
6363set TEST = 36
6464head err%TEST% -3
65- %PRG % -h -f err%TEST% .c.obj > test%TEST% .lst 2 >& 1
65+ %WMK % -h -f err%TEST% .c.obj > test%TEST% .lst 2 >& 1
6666diff err%TEST% .chk test%TEST% .lst
6767call :result
6868
6969set TEST = 39
7070head err%TEST% -3
7171echo . > ditty.c
72- %PRG % -h -f err%TEST% ditty.obj > test%TEST% .lst 2 >& 1
72+ %WMK % -h -f err%TEST% ditty.obj > test%TEST% .lst 2 >& 1
7373diff err%TEST% .chk test%TEST% .lst
7474call :result
7575
@@ -78,7 +78,7 @@ del ditty.*
7878head err%TEST% -3
7979echo . > err%TEST% .tst
8080chmod +r err%TEST% .tst > test%TEST% .lst
81- %PRG % -h -a -t -f err%TEST% >> test%TEST% .lst 2 >& 1
81+ %WMK % -h -a -t -f err%TEST% >> test%TEST% .lst 2 >& 1
8282chmod -r err%TEST% .tst
8383del err%TEST% .tst
8484diff err%TEST% .chk test%TEST% .lst
@@ -108,15 +108,15 @@ goto end
108108:work
109109 set TEST = %1
110110 head err%TEST% -3
111- %PRG % -f err%TEST% -h > test%TEST% .lst 2 >& 1
111+ %WMK % -f err%TEST% -h > test%TEST% .lst 2 >& 1
112112 diff -i err%TEST% .chk test%TEST% .lst
113113 call :result
114114goto end
115115
116116:debug
117117 set TEST = %1
118118 head err%TEST% -3
119- %PRG % -f err%TEST% -h -d > tmp%TEST% .lst 2 >& 1
119+ %WMK % -f err%TEST% -h -d > tmp%TEST% .lst 2 >& 1
120120 egrep W%TEST% tmp%TEST% .lst > test%TEST% .lst
121121 diff -i err%TEST% .chk test%TEST% .lst
122122 call :result
0 commit comments