diff options
author | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-01-20 10:26:42 +0000 |
---|---|---|
committer | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-01-20 10:26:42 +0000 |
commit | 211c166af99f9e7c5bf8492a09c394da42ba01f4 (patch) | |
tree | 39e8bda0c8ad3a765b91a233639427d0b447362a | |
parent | d8f69cf60a31b4a7a52835cab8bb48bda1923652 (diff) | |
download | gcc-211c166af99f9e7c5bf8492a09c394da42ba01f4.tar.gz |
2008-01-20 Paul Thomas <pault@gcc.gnu.org>
* trans-array.c (gfc_add_loop_ss_code) : Correct whitespace.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131677 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r-- | gcc/fortran/trans-array.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index 08c2a80d85c..f9c76190001 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -1907,7 +1907,7 @@ gfc_add_loop_ss_code (gfc_loopinfo * loop, gfc_ss * ss, bool subscript) case GFC_SS_CONSTRUCTOR: if (ss->expr->ts.type == BT_CHARACTER - && ss->string_length== NULL + && ss->string_length == NULL && ss->expr->ts.cl && ss->expr->ts.cl->length) { |