--- xlread.c.orig	Mon May 25 11:45:05 1998
+++ xlread.c	Thu Dec 23 16:43:50 1999
@@ -1167,7 +1167,7 @@
 
     pname(fptr,&escflag,&packindex);
     if (! null(getvalue(s_read_suppress))) return(NIL);
-    if (escflag || packindex >= 0 || !isnumber(buf,&val)) {
+    if (escflag || packindex >= 0 || !xl_isnumber(buf,&val)) {
       if (packindex >= 0) {
 	/* check for zero-length name */
 	if (buf[packindex+1] == 0) xlfail("zero length name after ':'");
@@ -1213,7 +1213,7 @@
     LVAL val;
     pname(fptr,&escflag);
     if (! null(getvalue(s_read_suppress))) return(NIL);
-    return (escflag || !isnumber(buf,&val) ? xlenter(buf) : val);
+    return (escflag || !xl_isnumber(buf,&val) ? xlenter(buf) : val);
 }
 #endif /* PACKAGES */
 
@@ -1449,7 +1449,7 @@
 	return 0;
 }
 
-int isnumber P2C(char *, str, LVAL *, pval)
+int xl_isnumber P2C(char *, str, LVAL *, pval)
 {
     int dl=0, dr=0;
     char *p = str;
