2008-01-20 Paul Thomas <pault@gcc.gnu.org>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 20 Jan 2008 10:26:42 +0000 (10:26 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 20 Jan 2008 10:26:42 +0000 (10:26 +0000)
* 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

gcc/fortran/trans-array.c

index 08c2a80..f9c7619 100644 (file)
@@ -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)
            {