diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1996-09-29 18:33:31 -0400 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1996-09-29 18:33:31 -0400 |
| commit | 7f070d5ee440a4810ab4a8b2bc41b1171baf8bbc (patch) | |
| tree | bcd4aea0d84b7c832c772097ac266e84c46eca45 | |
| parent | 8f6b2c91f0e35efd376481a58b93ff20adfd3d75 (diff) | |
| download | gcc-7f070d5ee440a4810ab4a8b2bc41b1171baf8bbc.tar.gz | |
(expand_asm_operands): Fix errors in previous patches.
From-SVN: r12860
| -rw-r--r-- | gcc/stmt.c | 36 |
1 files changed, 10 insertions, 26 deletions
diff --git a/gcc/stmt.c b/gcc/stmt.c index 3b6e147db30..21e493260f3 100644 --- a/gcc/stmt.c +++ b/gcc/stmt.c @@ -1422,12 +1422,12 @@ expand_asm_operands (string, outputs, inputs, clobbers, vol, filename, line) the worst that happens if we get it wrong is we issue an error message. */ - for (j = 0; j < TREE_STRING_LENGTH (TREE_PURPOSE (tail)); j++) + for (j = 0; j < TREE_STRING_LENGTH (TREE_PURPOSE (tail)) - 1; j++) switch (TREE_STRING_POINTER (TREE_PURPOSE (tail))[j]) { case '+': /* Make sure we can specify the matching operand. */ - if (i >= '0' && i <= '9') + if (i > 9) { error ("output operand constraint %d contains `+'", i); return; @@ -1545,7 +1545,7 @@ expand_asm_operands (string, outputs, inputs, clobbers, vol, filename, line) /* Make sure constraint has neither `=' nor `+'. */ - for (j = 0; j < TREE_STRING_LENGTH (TREE_PURPOSE (tail)); j++) + for (j = 0; j < TREE_STRING_LENGTH (TREE_PURPOSE (tail)) - 1; j++) switch (TREE_STRING_POINTER (TREE_PURPOSE (tail))[j]) { case '+': case '=': @@ -3448,29 +3448,13 @@ expand_decl (decl) enum machine_mode reg_mode = promote_mode (type, DECL_MODE (decl), &unsignedp, 0); - if (TREE_CODE (type) == COMPLEX_TYPE) - { - rtx realpart, imagpart; - enum machine_mode partmode = TYPE_MODE (TREE_TYPE (type)); - - /* For a complex type variable, make a CONCAT of two pseudos - so that the real and imaginary parts - can be allocated separately. */ - realpart = gen_reg_rtx (partmode); - REG_USERVAR_P (realpart) = 1; - imagpart = gen_reg_rtx (partmode); - REG_USERVAR_P (imagpart) = 1; - DECL_RTL (decl) = gen_rtx (CONCAT, reg_mode, realpart, imagpart); - } - else - { - DECL_RTL (decl) = gen_reg_rtx (reg_mode); - if (TREE_CODE (type) == POINTER_TYPE) - mark_reg_pointer (DECL_RTL (decl), - (TYPE_ALIGN (TREE_TYPE (TREE_TYPE (decl))) - / BITS_PER_UNIT)); - REG_USERVAR_P (DECL_RTL (decl)) = 1; - } + DECL_RTL (decl) = gen_reg_rtx (reg_mode); + mark_user_reg (DECL_RTL (decl)); + + if (TREE_CODE (type) == POINTER_TYPE) + mark_reg_pointer (DECL_RTL (decl), + (TYPE_ALIGN (TREE_TYPE (TREE_TYPE (decl))) + / BITS_PER_UNIT)); } else if (TREE_CODE (DECL_SIZE (decl)) == INTEGER_CST) { |