On Mon, Aug 08, 2005 at 09:23:07AM +0200, Bernhard Fischer wrote:
> /* Determine the maximum allowed line length. */
> - if (gfc_current_form == FORM_FREE)
> - maxlen = GFC_MAX_LINE;
> - else
> + if (gfc_current_form == FORM_FREE) {
> + if (gfc_option.fixed_line_length == 72) /* default */
> + maxlen = GFC_MAX_LINE;
> + else
> + maxlen = gfc_option.fixed_line_length;
> + } else
> maxlen = gfc_option.fixed_line_length;
Unless I misunderstand the above, the following
gfortran -ffixed_line_length=72 test.f90
will use GFC_MAX_LINE, which is 132 (not the requested
length of 72).
--
Steve
