1 files changed, 2 insertions, 2 deletions
diff --git a/lobject.c b/lobject.c
index b68f7e98..45682c50 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lobject.c,v 1.15 1999/01/04 13:37:07 roberto Exp roberto $
+** $Id: lobject.c,v 1.16 1999/01/13 19:08:37 roberto Exp roberto $
 ** Some generic functions over Lua objects
 ** See Copyright Notice in lua.h
 */
@@ -112,7 +112,7 @@ double luaO_str2d (char *s) {  /* LUA_NUMBER */
      s++;
      sig = -1;
    }
-    if (!isdigit((unsigned char)*s)) return -1;  /* no digit in expoent part? */
+    if (!isdigit((unsigned char)*s)) return -1;  /* no digit in the exponent? */
    do {
      e = 10*e + (*(s++)-'0');
    } while (isdigit((unsigned char)*s));

diff --git a/lobject.c b/lobject.c index b68f7e98..45682c50 100644 --- a/lobject.c +++ b/lobject.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: lobject.c,v 1.15 1999/01/04 13:37:07 roberto Exp roberto $	2	** $Id: lobject.c,v 1.16 1999/01/13 19:08:37 roberto Exp roberto $
3	** Some generic functions over Lua objects	3	** Some generic functions over Lua objects
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -112,7 +112,7 @@ double luaO_str2d (char s) { / LUA_NUMBER */
112	s++;	112	s++;
113	sig = -1;	113	sig = -1;
114	}	114	}
115	if (!isdigit((unsigned char)s)) return -1; / no digit in expoent part? */	115	if (!isdigit((unsigned char)s)) return -1; / no digit in the exponent? */
116	do {	116	do {
117	e = 10e + ((s++)-'0');	117	e = 10e + ((s++)-'0');
118	} while (isdigit((unsigned char)*s));	118	} while (isdigit((unsigned char)*s));