mingw-w64-crt/math/arm64/scalbn.c

/**
 * This file has no copyright assigned and is placed in the Public Domain.
 * This file is part of the mingw-w64 runtime package.
 * No warranty is given; refer to the file DISCLAIMER.PD within this package.
 */

#include <math.h>

double scalbn(double x, int exp)
{
    return x * exp2(exp);
}

float scalbnf(float x, int exp)
{
    return x * exp2f(exp);
}

long double scalbnl(long double x, int exp)
{
#if defined(__aarch64__) || defined(_ARM64_)
    return scalbn(x, exp);
#else
#error Not supported on your platform yet
#endif
}