Lines Matching full:"$ field"
933 local($field, $val, $flags, $do_chop, $need_redo, $start_lineno);
948 ($field, $val) = ($1, $2);
949 $sfield = $field;
950 $flags = $test_fields{$field};
952 print STDERR "$prog:$file:$.: unrecognised field \"$field\"\n";
956 local($cnt) = $cnt{$field}++;
957 $test{$field} = $cnt{$field};
960 } elsif (defined $test{$field}) {
961 print STDERR "$prog:$file:$.: multiple \"$field\" fields\n";
977 "$prog:$file:$.: no parameters given for field \"$field\"\n";
997 if ($field eq 'file-setup') {
1033 if ($field eq 'file-result') {
1088 "$prog:$file:$.: no value given for field \"$field\"\n";
1105 while (($field, $val) = each %test_fields) {
1106 if ($val =~ /r/ && !defined $test{$field}) {
1108 "$prog:$file:$start_lineno: required field \"$field\" missing\n";
