Mostly cleanup. Doesn't prints it's own pass/fail message anymore.
authorRob Savoye <rob@cygnus>
Mon, 19 Apr 1993 21:05:03 +0000 (21:05 +0000)
committerRob Savoye <rob@cygnus>
Mon, 19 Apr 1993 21:05:03 +0000 (21:05 +0000)
binutils/testsuite/lib/util-defs.exp

index 4a2f0134f3b899943cef0267491b732ddec83c66..d26907249fac8c48201b94a74617ada4b510ac19 100755 (executable)
@@ -65,16 +65,12 @@ proc util_test { args } {
     set comp_output [util_start $cmd $cmd_arg $file]
 
     if [regexp "$pattern" $comp_output] then {
-       pass "$message"
        return 0
     }
 
     if [string match "" $comp_output] then {
-       warning "Got no output."
        return 1
     }
-
-    fail "$message"
     return 1
 }