From: eck <none@none>
Date: Fri, 7 Sep 1990 11:00:24 +0000 (+0000)
Subject: strod() & _str_ext_cvt() made more strictly conforming
X-Git-Tag: release-5-5~1558
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=2c9fbebe4e0f8b455de6612d10821f62e3898ccd;p=ack.git

strod() & _str_ext_cvt() made more strictly conforming
---

diff --git a/lang/cem/libcc.ansi/stdlib/ext_comp.c b/lang/cem/libcc.ansi/stdlib/ext_comp.c
index 970f93432..f4dd8ec26 100644
--- a/lang/cem/libcc.ansi/stdlib/ext_comp.c
+++ b/lang/cem/libcc.ansi/stdlib/ext_comp.c
@@ -455,7 +455,7 @@ add_exponent(struct EXTEND *e, int exp)
 	}
 }
 
-_str_ext_cvt(char *s, char **ss, struct EXTEND *e)
+_str_ext_cvt(const char *s, char **ss, struct EXTEND *e)
 {
 	/*	Like strtod, but for extended precision */
 	register int	c;
@@ -463,7 +463,7 @@ _str_ext_cvt(char *s, char **ss, struct EXTEND *e)
 	int		digitseen = 0;
 	int		exp = 0;
 
-	if (ss) *ss = s;
+	if (ss) *ss = (char *)s;
 	while (isspace(*s)) s++;
 
 	e->sign = 0;
@@ -496,7 +496,7 @@ _str_ext_cvt(char *s, char **ss, struct EXTEND *e)
 	}
 	if (! digitseen) return;
 
-	if (ss) *ss = s - 1;
+	if (ss) *ss = (char *)s - 1;
 
 	if (c == 'E' || c == 'e') {
 		int	exp1 = 0;
@@ -519,7 +519,7 @@ _str_ext_cvt(char *s, char **ss, struct EXTEND *e)
 					exp_overflow = 1;
 				}
 			} while (c = *++s, isdigit(c));
-			if (ss) *ss = s;
+			if (ss) *ss = (char *)s;
 		}
 		exp += sign * exp1;
 		if (exp_overflow) {
diff --git a/lang/cem/libcc.ansi/stdlib/strtod.c b/lang/cem/libcc.ansi/stdlib/strtod.c
index 3c1c14a1e..a835671b4 100644
--- a/lang/cem/libcc.ansi/stdlib/strtod.c
+++ b/lang/cem/libcc.ansi/stdlib/strtod.c
@@ -1,12 +1,13 @@
 /* $Header$ */
 
+#include	<stdlib.h>
 #include	"ext_fmt.h"
 
-void _str_ext_cvt(char *s, char **ss, struct EXTEND *e);
+void _str_ext_cvt(const char *s, char **ss, struct EXTEND *e);
 double _ext_dbl_cvt(struct EXTEND *e);
 
 double
-strtod(char *p, char **pp)
+strtod(const char *p, char **pp)
 {
 	struct EXTEND e;