mirror of
https://https.git.savannah.gnu.org/git/bash.git
synced 2026-07-14 07:30:49 +02:00
commit bash-20190614 snapshot
This commit is contained in:
@@ -1524,6 +1524,8 @@ evalerror (msg)
|
||||
from [0-9][a-z][A-Z]_@ (a = 10, z = 35, A = 36, Z = 61, @ = 62, _ = 63 --
|
||||
you get the picture). */
|
||||
|
||||
#define VALID_NUMCHAR(c) (ISALNUM(c) || ((c) == '_') || ((c) == '@'))
|
||||
|
||||
static intmax_t
|
||||
strlong (num)
|
||||
char *num;
|
||||
@@ -1570,8 +1572,15 @@ strlong (num)
|
||||
base = val;
|
||||
val = 0;
|
||||
foundbase++;
|
||||
|
||||
#if 0 /* TAG:bash-5.1 */
|
||||
/* Make sure a base# is followed by a character that can compose a
|
||||
valid integer constant. Jeremy Townshend <jeremy.townshend@gmail.com> */
|
||||
if (VALID_NUMCHAR (*s) == 0)
|
||||
evalerror (_("invalid integer constant"));
|
||||
#endif
|
||||
}
|
||||
else if (ISALNUM(c) || (c == '_') || (c == '@'))
|
||||
else if (VALID_NUMCHAR (c))
|
||||
{
|
||||
if (DIGIT(c))
|
||||
c = TODIGIT(c);
|
||||
|
||||
Reference in New Issue
Block a user