diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1993-03-02 19:01:48 -0500 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1993-03-02 19:01:48 -0500 |
| commit | 03407c75274a50c1d131dbd9522bd9cdf0f6fab6 (patch) | |
| tree | 9f6382f4940740ef79be67d142603c1126f7ed1f /gcc/c-iterate.c | |
| parent | be8dcd745fe101829bcdb446ec3ac45fe8da13ae (diff) | |
| download | gcc-03407c75274a50c1d131dbd9522bd9cdf0f6fab6.zip gcc-03407c75274a50c1d131dbd9522bd9cdf0f6fab6.tar.gz gcc-03407c75274a50c1d131dbd9522bd9cdf0f6fab6.tar.bz2 | |
(collect_iterators): Handle simple expressions quickly.
Don't try to interpret operands that are RTL as if they were trees.
From-SVN: r3616
Diffstat (limited to 'gcc/c-iterate.c')
| -rw-r--r-- | gcc/c-iterate.c | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/gcc/c-iterate.c b/gcc/c-iterate.c index 04d4b70..91d9c35 100644 --- a/gcc/c-iterate.c +++ b/gcc/c-iterate.c @@ -212,14 +212,37 @@ collect_iterators (exp, list) switch (TREE_CODE_CLASS (TREE_CODE (exp))) { case '1': + return collect_iterators (TREE_OPERAND (exp, 0), list); + case '2': case '<': + return collect_iterators (TREE_OPERAND (exp, 0), + collect_iterators (TREE_OPERAND (exp, 1), + list)); + case 'e': case 'r': { int num_args = tree_code_length[TREE_CODE (exp)]; int i; + /* Some tree codes have RTL, not trees, as operands. */ + switch (TREE_CODE (exp)) + { + case SAVE_EXPR: + case CALL_EXPR: + num_args = 2; + break; + case METHOD_CALL_EXPR: + num_args = 3; + break; + case WITH_CLEANUP_EXPR: + num_args = 1; + break; + case RTL_EXPR: + return list; + } + for (i = 0; i < num_args; i++) list = collect_iterators (TREE_OPERAND (exp, i), list); return list; |