[Patch, fortran] Fix PR19101 missing & in character continuation not caught

Paul Thomas paulthomas2@wanadoo.fr
Wed Mar 8 16:52:00 GMT 2006


Steve,

What about something like:

>
>void
>gfc_gobble_whitespace (void)
>{
>  static bool seen_tab;
>  locus old_loc;
>  int c;
>  do
>    {
>      old_loc = gfc_current_locus;
>      c = gfc_next_char_literal (0);
>      if (!gfc_option.flag_tabs && c == '\t'
>          && !seen_tab)
>        {
>           gfc_warning_now ("Nonconforming tab character at %C; "
>
                              "repetitions will be ignored.");

>           seen_tab = true;
>        }
>    }
>  while (gfc_is_whitespace (c));
>
>  gfc_current_locus = old_loc;
>}
>
>But, this can't deal with the fixed-form, column 1, issue.
>
>
It seems to me that a one-off warning to go check the source would be 
the way to do it.

Paul



More information about the Fortran mailing list