[patch, fortran, committed] PR31812 Better message when truncating long lines

[Jerry DeLisle]

I am committing the following as obvious and simple.  Gives a warning all the 
time for free format when a line gets truncated.

Index: parse.c
===================================================================
*** parse.c     (revision 125102)
--- parse.c     (working copy)
*************** next_statement (void)
*** 653,659 ****

         if (gfc_at_eol ())
         {
!         if (gfc_option.warn_line_truncation
               && gfc_current_locus.lb
               && gfc_current_locus.lb->truncated)
             gfc_warning_now ("Line truncated at %C");
--- 653,659 ----

         if (gfc_at_eol ())
         {
!         if ((gfc_option.warn_line_truncation || gfc_current_form == FORM_FREE)
               && gfc_current_locus.lb
               && gfc_current_locus.lb->truncated)
             gfc_warning_now ("Line truncated at %C");