diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:55:10 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:55:10 +0300 |
commit | 00ef0423acd97cb964a2bae54c93a03a8ab50e5e (patch) | |
tree | 2864426773f537f912db1bd716c27b713c5f7dcf /ext.c | |
parent | 3ba50a15ebd976f7a88393e2e45dc14b6478b9a9 (diff) | |
download | egawk-00ef0423acd97cb964a2bae54c93a03a8ab50e5e.tar.gz egawk-00ef0423acd97cb964a2bae54c93a03a8ab50e5e.tar.bz2 egawk-00ef0423acd97cb964a2bae54c93a03a8ab50e5e.zip |
Move to 3.1.8.
Diffstat (limited to 'ext.c')
-rw-r--r-- | ext.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -7,7 +7,7 @@ */ /* - * Copyright (C) 1995 - 2001, 2003-2009 the Free Software Foundation, Inc. + * Copyright (C) 1995 - 2001, 2003-2010 the Free Software Foundation, Inc. * * This file is part of GAWK, the GNU implementation of the * AWK Programming Language. @@ -105,7 +105,7 @@ make_builtin(char *name, NODE *(*func) P((NODE *)), int count) fatal(_("extension: missing function name")); while ((c = *sp++) != '\0') - if ((sp == &name[1] && c != '_' && ! ISALPHA(c)) + if ((sp == &name[1] && c != '_' && ! isalpha(c)) || (sp > &name[1] && ! is_identchar(c))) fatal(_("extension: illegal character `%c' in function name `%s'"), c, name); |