You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#include "soft.h"
|
|
|
|
/* Adds 'e' to binary exponent of d (unless d=0), result is returned
|
|
*/
|
|
double ldexp(double d, int e)
|
|
{
|
|
struct bitdouble *dp = (struct bitdouble *)&d;
|
|
|
|
if (dp->exp) dp->exp += e;
|
|
return d;
|
|
}
|
