Lines Matching refs:case
71 # The structure of each case is:
79 # foreach case $cases {
80 # puts "\tFop$tnum.$i: $case"
84 # To run a particular case, add the case in this format and
93 foreach case $cases {
96 # Extract elements of the case
97 set op1 [lindex [lindex $case 0] 0]
98 set names1 [lindex [lindex $case 0] 1]
99 set res1 [lindex [lindex $case 0] 2]
100 set end1 [lindex [lindex $case 0] 3]
102 set op2 [lindex [lindex $case 1] 0]
103 set names2 [lindex [lindex $case 1] 1]
104 set res2 [lindex [lindex $case 1] 2]
172 # Clean up for next case