-# Copyright 1995-1997, 1999, 2007-2012 Free Software Foundation, Inc.
+# Copyright 1995-2013 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
runto gen_ABRT
-for {set i 0;} {$i < [llength $signals]} {incr i;} {
- # Skip the first.
- if { $i == 0 } {
- continue
- }
-
- set sig [lindex $signals $i]
+foreach sig [lrange $signals 1 end] {
test_one_sig $sig
}