inline long double tgamma(long double x) { #ifdef BOOST_MSVC return gamma((double)x); #else return gammal(x); #endif }
static TACommandVerdict gammal_cmd(TAThread thread,TAInputStream stream) { long double x, res; x = readLongDouble(&stream); START_TARGET_OPERATION(thread); errno = 0; res = gammal(x); END_TARGET_OPERATION(thread); writeInt(thread, errno); writeLongDouble(thread, res); writeInt(thread, signgam); sendResponse(thread); return taDefaultVerdict; }