| 6259 | } |
| 6260 | |
| 6261 | static idhdl rSimpleFindHdl(const ring r, const idhdl root, const idhdl n) |
| 6262 | { |
| 6263 | idhdl h=root; |
| 6264 | while (h!=NULL) |
| 6265 | { |
| 6266 | if ((IDTYP(h)==RING_CMD) |
| 6267 | && (h!=n) |
| 6268 | && (IDRING(h)==r) |
| 6269 | ) |
| 6270 | { |
| 6271 | return h; |
| 6272 | } |
| 6273 | h=IDNEXT(h); |
| 6274 | } |
| 6275 | return NULL; |
| 6276 | } |
| 6277 | |
| 6278 | extern BOOLEAN jjPROC(leftv res, leftv u, leftv v); |
| 6279 |