* Promoted precision in Float->String transformations.
git-svn-id: svn://svn.zoy.org/elk/trunk@178 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
		
							parent
							
								
									c4fbd1b8f2
								
							
						
					
					
						commit
						ab40058bed
					
				| 
						 | 
				
			
			@ -105,10 +105,10 @@ Object Fixnum_To_String (Object x, int radix) {
 | 
			
		|||
}
 | 
			
		||||
 | 
			
		||||
char *Flonum_To_String (Object x) {
 | 
			
		||||
    static char buf[32];
 | 
			
		||||
    static char buf[64];
 | 
			
		||||
    char *p;
 | 
			
		||||
 | 
			
		||||
    sprintf (buf, "%.15g", FLONUM(x)->val);
 | 
			
		||||
    sprintf (buf, "%.31g", FLONUM(x)->val);
 | 
			
		||||
    for (p = buf; *p; p++)
 | 
			
		||||
        if (*p == '.' || *p == 'e' || *p == 'N' || *p == 'i')
 | 
			
		||||
            return buf;
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue