musl-tcc/src/math/ldexp.c

#include <math.h>

double ldexp(double x, int n)
{
	return scalbn(x, n);
}