49
49
test_fail "wrong number of errors reported";
52
if not test_error :index 1 :matches
52
if not test_error :index 1 :matches
53
53
"unknown * ':all' for * header test *" {
54
54
test_fail "error 1 is invalid";
57
if not test_error :index 2 :matches
57
if not test_error :index 2 :matches
58
58
"*header test * string list * 1 (header names), but * number *" {
59
59
test_fail "error 2 is invalid";
64
64
test_fail "error 3 is invalid";
67
if not test_error :index 4 :matches
67
if not test_error :index 4 :matches
68
68
"* unexpected tagged argument ':tag' while *" {
69
69
test_fail "error 4 is invalid";
72
if not test_error :index 5 :matches
72
if not test_error :index 5 :matches
73
73
"* header test requires 2 *, but 1 *" {
74
74
test_fail "error 5 is invalid";
77
if not test_error :index 6 :matches
77
if not test_error :index 6 :matches
78
78
"* header test requires 2 *, but 0 *" {
79
79
test_fail "error 6 is invalid";
82
if not test_error :index 7 :matches
82
if not test_error :index 7 :matches
83
83
"*header test accepts no sub-tests* specified*" {
84
84
test_fail "error 7 is invalid";
87
if not test_error :index 8 :matches
87
if not test_error :index 8 :matches
88
88
"* use test 'header' * command*" {
89
89
test_fail "error 8 is invalid";
92
if not test_error :index 9 :matches
92
if not test_error :index 9 :matches
93
93
"* use test 'header' * command*" {
94
94
test_fail "error 9 is invalid";