From: Ben Pfaff Date: Thu, 1 Feb 2007 15:01:42 +0000 (+0000) Subject: Accept TO in any case for use with n-ary functions. Fixes bug #18923. X-Git-Tag: v0.6.0~572 X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2ecff1a148bee8df55a3003a407147c9af8f19c8;p=pspp-builds.git Accept TO in any case for use with n-ary functions. Fixes bug #18923. Thanks to John Darrington for reporting this bug. --- diff --git a/src/language/expressions/ChangeLog b/src/language/expressions/ChangeLog index 98df4a36..ab993251 100644 --- a/src/language/expressions/ChangeLog +++ b/src/language/expressions/ChangeLog @@ -1,3 +1,9 @@ +Thu Feb 1 06:59:27 2007 Ben Pfaff + + * parse.c (parse_function): Accept TO in any case for use with + n-ary functions. Fixes bug #18923. Thanks to John Darrington for + reporting this bug. + Sat Dec 16 12:20:14 2006 Ben Pfaff * operations.def: Reverse order of arguments to DATEDIFF, for diff --git a/src/language/expressions/parse.c b/src/language/expressions/parse.c index 5c1e4632..695d3caf 100644 --- a/src/language/expressions/parse.c +++ b/src/language/expressions/parse.c @@ -1216,7 +1216,8 @@ parse_function (struct lexer *lexer, struct expression *e) if (lex_token (lexer) != ')') for (;;) { - if (lex_token (lexer) == T_ID && lex_look_ahead (lexer) == 'T') + if (lex_token (lexer) == T_ID + && toupper (lex_look_ahead (lexer)) == 'T') { struct variable **vars; size_t var_cnt;