579 |
# list, regardless of order to make sure they're found. |
# list, regardless of order to make sure they're found. |
580 |
# So we look for lists in side of lists, and make sure all |
# So we look for lists in side of lists, and make sure all |
581 |
# the elements match before we decide this is legit. |
# the elements match before we decide this is legit. |
582 |
|
# Se we 'incl_hit' to 1 before the loop so that if the 'includes' |
583 |
|
# list is empty, this test will report a hit. (This can be |
584 |
|
# useful if a target will always fail unless certain flags, |
585 |
|
# specified in the 'excludes' list, are used.) |
586 |
|
set incl_hit 1 |
587 |
for { set i 0 } { $i < [llength $includes] } { incr i } { |
for { set i 0 } { $i < [llength $includes] } { incr i } { |
588 |
set incl_hit 0 |
set incl_hit 0 |
589 |
set opt [lindex $includes $i] |
set opt [lindex $includes $i] |