(compile_stack, regnum)
| 2171 | false if it's not. */ |
| 2172 | |
| 2173 | static boolean |
| 2174 | group_in_compile_stack (compile_stack, regnum) |
| 2175 | compile_stack_type compile_stack; |
| 2176 | regnum_t regnum; |
| 2177 | { |
| 2178 | int this_element; |
| 2179 | |
| 2180 | for (this_element = compile_stack.avail - 1; |
| 2181 | this_element >= 0; |
| 2182 | this_element--) |
| 2183 | if (compile_stack.stack[this_element].regnum == regnum) |
| 2184 | return true; |
| 2185 | |
| 2186 | return false; |
| 2187 | } |
| 2188 | |
| 2189 | |
| 2190 | /* Read the ending character of a range (in a bracket expression) from the |