git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@2679
4a8a32a2-be11-0410-ad9d-
d568d2c75423
}
//Get the fraction
- if (*s=='.')
+ if (*s == '.')
{
s++;
- for (fraction=10.0; isdigit(*s); s++)
+ for (fraction=0.1; isdigit(*s); s++)
{
- value+=(*s-'0')/fraction;
- fraction*=10.0;
+ value+=(*s-'0')*fraction;
+ fraction*=0.1;
}
}
if (toupper(*s)=='E')
{
s++;
- while(*s=='0') s++;//So atoi doesn't return an octal number
iexp=(char)atoi(s);
{
while(iexp!=0)
{
if(iexp<0)
{
- value/=10.0;
+ value*=0.1;
iexp++;
}
else