Greetings, and thank you so much! Committed into CVS head (didn't
make it into t4 alas).
Take care,
Robert Boyer <[EMAIL PROTECTED]> writes:
> Here's a GCL ANSI compliance bug in GCL's FORMAT function that is easy to
> fix.
>
> As every FORMAT user knows, tilde commands can be optionally given a colon
> and/or atsign modifier, in any order. "There is no required ordering between
> the at-sign and colon modifier." ANSI doc, p. 22-20.
>
> Currently GCL requires the colon to come first, before the atsign (if any),
> (or not at all). For example, in GCL, (format nil "~@:R" 1) causes an error
> but (format nil "~:@R" 1) does not. In o/format.c you can see where the
> colon and atsign are processed, in order. So one should replace what comes
> after DIRECTIVE:
>
> DIRECTIVE:
> colon = atsign = FALSE;
> if (c == ':') {
> colon = TRUE;
> c = ctl_advance();
> }
> if (c == '@') {
> atsign = TRUE;
> c = ctl_advance();
> }
>
>
>
>
> with the following
>
>
>
>
>
> DIRECTIVE:
> colon = atsign = FALSE;
> if (c == ':') {
> colon = TRUE;
> c = ctl_advance();
> }
> if (c == '@') {
> atsign = TRUE;
> c = ctl_advance();
> if (!colon) {if (c == ':') {colon = TRUE;
> c = ctl_advance();}}
> }
>
> Bob
>
>
>
--
Camm Maguire [EMAIL PROTECTED]
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah
_______________________________________________
Gcl-devel mailing list
Gcl-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/gcl-devel
