20       int  exp, expdiff, j, k, hi, lo, cn;
27           exp = expa + 1;
31           exp = expb + 1;
45         exp = exp - k + cn;
47         if (mant ==  0 || mant == -1)  exp = 0x8001;
48         c = (mant & MANTMASK) | (((lint) exp) & EXP_MASK);
67 #define exp        R8  macro
91         if ( ce.new) exp = add(expa, #1)
92         if (!ce.new) exp = add(expb, #1)
122         exp = SUB(exp, k)  define
128         exp = ZXTH(exp)  define
131         if(p2.new) exp = add(exp, #1)
137         if(!p0.new) manta = OR(manta,exp)
144         if(!p0.new) manta = OR(manta,exp)
155       int  exp, expdiff, j, k, hi, lo, cn;
162           exp = expa + 1;
166           exp = expb + 1;
180         exp = exp - k + cn;
182         if (mant ==  0 || mant == -1)  exp = 0x8001;
183         c = (mant & MANTMASK) | (((lint) exp) & EXP_MASK);
202 #define exp        R8  macro
226         if ( ce.new) exp = add(expa, #1)
227         if (!ce.new) exp = add(expb, #1)
257         exp = SUB(exp, k)  define
263         exp = ZXTH(exp)  define
266         if(p2.new) exp = add(exp, #1)
272         if(!p0.new) manta = OR(manta,exp)
279         if(!p0.new) manta = OR(manta,exp)
290         int exp, k;
310         exp = expa + expb - k;
311         if (mant ==  0 || mant == -1)  exp = 0x8001;
312         c = (mant & MANTMASK) | (((lint) exp) & EXP_MASK);
330 #define exp        R8  macro
359         exp = add(expa, expb)  define
376         exp = sub(exp, k)  define
383         exp = zxth(exp)  define
389         if(!p0.new) mantal = or(mantal,exp)
396         if(!p0.new) mantal = or(mantal,exp)