DItype __bid_fixdddi (_Decimal64 x) { DItype res = 0xbaddbaddbaddbaddull; union decimal64 ux; ux.d = x; res = __bid64_to_int64_xint (ux.i); return (res); }
DItype __bid_fixsddi (_Decimal32 x) { DItype res = 0xbaddbaddbaddbaddull; UINT64 x64; union decimal32 ux; ux.d = x; x64 = __bid32_to_bid64 (ux.i); res = __bid64_to_int64_xint (x64); return (res); }