FastPower does not work

[iga2iga]

FastPower(Single, Single) does not work with Base = 0,474733531475067 eg and Exponent = 150, should return zero. The same checks as in rtl before Result := FastExp2(AExponent * FastLog2(ABase)); make it work as it should.