| 1071 | *----------------------------------------------------------------------------*/ |
| 1072 | |
| 1073 | floatx80 packFloatx80( flag zSign, int32_t zExp, uint64_t zSig ) |
| 1074 | { |
| 1075 | floatx80 z; |
| 1076 | |
| 1077 | z.low = zSig; |
| 1078 | z.high = ( ( (uint16_t) zSign )<<15 ) + zExp; |
| 1079 | return z; |
| 1080 | |
| 1081 | } |
| 1082 | |
| 1083 | /*---------------------------------------------------------------------------- |
| 1084 | | Takes an abstract floating-point value having sign `zSign', exponent `zExp', |
no outgoing calls