|
@@ -1,5 +1,5 @@
|
|
|
/*
|
|
|
-** $Id: lobject.c,v 2.110 2016/05/02 14:00:32 roberto Exp roberto $
|
|
|
+** $Id: lobject.c,v 2.111 2016/05/20 14:07:48 roberto Exp roberto $
|
|
|
** Some generic functions over Lua objects
|
|
|
** See Copyright Notice in lua.h
|
|
|
*/
|
|
@@ -280,7 +280,7 @@ static const char *l_str2d (const char *s, lua_Number *result) {
|
|
|
endptr = l_str2dloc(s, result, mode); /* try to convert */
|
|
|
if (endptr == NULL) { /* failed? may be a different locale */
|
|
|
char buff[L_MAXLENNUM + 1];
|
|
|
- char *pdot = strchr(s, '.');
|
|
|
+ const char *pdot = strchr(s, '.');
|
|
|
if (strlen(s) > L_MAXLENNUM || pdot == NULL)
|
|
|
return NULL; /* string too long or no dot; fail */
|
|
|
strcpy(buff, s); /* copy string to buffer */
|