yggdrasil/gcc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

libjava.exp (libjava_prune_warnings): Remove all unreachable bytecode warnings.

Browse Source 
* lib/libjava.exp (libjava_prune_warnings): Remove all unreachable
       bytecode warnings.

From-SVN: r62190
This commit is contained in:
Mark Wielaard
2003-01-31 18:09:04 +00:00
committed by Mark Wielaard
parent 60c7f4ef5e
commit 08fcde7c43
2 changed files with 14 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libjava/testsuite/lib/libjava.exp
+9 -3
View File
@@ -18,9 +18,15 @@ proc libjava_prune_warnings {text} {
set len [llength $tlist]
for {set i [expr {$len - 1}]} {$i >= 2} {incr i -1} {
if {[string match "*unreachable bytecode*" [lindex $tlist $i]]} {
# Delete this line and the previous two lines.
set tlist [lreplace $tlist [expr {$i - 2}] $i]
incr i -2
# Delete this line, all other unreachable warnings and the previous
# two lines containing the method and class.
set j [expr {$i - 1}]
while {[string match "*unreachable bytecode*" [lindex $tlist $j]]} {
incr j -1
}
incr j -1
set tlist [lreplace $tlist $j $i]
set i $j
}
}
return [join $tlist \n]