[MLton-commit] r4589

Stephen Weeks MLton@mlton.org
Wed, 24 May 2006 17:32:02 -0700


Renamed dtoa as gdtoa_dtoa, since dtoa is defined on Cygwin.

----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/runtime/gdtoa-patch

----------------------------------------------------------------------

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/gdtoa-patch
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/gdtoa-patch	2006-05-25 00:31:28 UTC (rev 4588)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/gdtoa-patch	2006-05-25 00:32:01 UTC (rev 4589)
@@ -1,6 +1,6 @@
 diff -P -C 2 -r gdtoa/arithchk.c gdtoa-new/arithchk.c
 *** gdtoa/arithchk.c	1998-06-19 13:46:11.000000000 -0700
---- gdtoa-new/arithchk.c	2006-05-10 14:12:02.477056503 -0700
+--- gdtoa-new/arithchk.c	2006-05-24 17:02:44.303399187 -0700
 ***************
 *** 137,141 ****
   	}
@@ -14,18 +14,45 @@
 ! int main()
   {
   	Akind *a = 0;
+Binary files gdtoa/arithchk.out and gdtoa-new/arithchk.out differ
+diff -P -C 2 -r gdtoa/dtoa.c gdtoa-new/dtoa.c
+*** gdtoa/dtoa.c	2000-11-02 07:09:01.000000000 -0800
+--- gdtoa-new/dtoa.c	2006-05-24 17:04:27.987435180 -0700
+***************
+*** 81,85 ****
+  
+   char *
+! dtoa
+  #ifdef KR_headers
+  	(d, mode, ndigits, decpt, sign, rve)
+--- 81,85 ----
+  
+   char *
+! gdtoa_dtoa
+  #ifdef KR_headers
+  	(d, mode, ndigits, decpt, sign, rve)
 diff -P -C 2 -r gdtoa/gdtoa.h gdtoa-new/gdtoa.h
 *** gdtoa/gdtoa.h	2000-11-01 07:01:39.000000000 -0800
---- gdtoa-new/gdtoa.h	2006-05-10 14:06:30.680495461 -0700
+--- gdtoa-new/gdtoa.h	2006-05-24 17:04:17.015912822 -0700
 ***************
-*** 114,119 ****
+*** 109,119 ****
+  #endif
+  
+! extern char* dtoa  ANSI((double d, int mode, int ndigits, int *decpt,
+  			int *sign, char **rve));
+  extern char* gdtoa ANSI((FPI *fpi, int be, ULong *bits, int *kindp,
   			int mode, int ndigits, int *decpt, char **rve));
   extern void freedtoa ANSI((char*));
 ! extern float  strtof ANSI((CONST char *, char **));
 ! extern double strtod ANSI((CONST char *, char **));
   extern int strtodg ANSI((CONST char*, char**, FPI*, Long*, ULong*));
   
---- 114,119 ----
+--- 109,119 ----
+  #endif
+  
+! extern char* gdtoa_dtoa  ANSI((double d, int mode, int ndigits, int *decpt,
+  			int *sign, char **rve));
+  extern char* gdtoa ANSI((FPI *fpi, int be, ULong *bits, int *kindp,
   			int mode, int ndigits, int *decpt, char **rve));
   extern void freedtoa ANSI((char*));
 ! extern float  gdtoa_strtof ANSI((CONST char *, char **));
@@ -34,7 +61,7 @@
   
 diff -P -C 2 -r gdtoa/strtod.c gdtoa-new/strtod.c
 *** gdtoa/strtod.c	2003-03-21 13:24:01.000000000 -0800
---- gdtoa-new/strtod.c	2006-05-10 14:05:47.597263849 -0700
+--- gdtoa-new/strtod.c	2006-05-24 17:02:44.309398379 -0700
 ***************
 *** 59,63 ****
   
@@ -50,7 +77,7 @@
   	(s00, se) CONST char *s00; char **se;
 diff -P -C 2 -r gdtoa/strtof.c gdtoa-new/strtof.c
 *** gdtoa/strtof.c	2000-11-01 20:31:40.000000000 -0800
---- gdtoa-new/strtof.c	2006-05-10 14:06:15.872478149 -0700
+--- gdtoa-new/strtof.c	2006-05-24 17:02:44.309398379 -0700
 ***************
 *** 38,46 ****
   #include "gdtoaimp.h"