Lines Matching full:a1
44 lea fpreg_mask,%a1
45 moveb (%a1,%d0.w),%d0 |convert reg# to dynamic register mask
89 movel %a0,%a1 |save source addr in a1
104 | a1 -> source in extended precision
107 | a1 -> destroyed
132 movew LOCAL_EX(%a1),%d0 |get exponent
139 tstb LOCAL_SGN(%a1)
146 clrl LOCAL_HI(%a1) |clear msb
147 tstb LOCAL_SGN(%a1)
151 movel %d0,LOCAL_EX(%a1) |put the new exp back on the stack
154 movel LOCAL_HI(%a1),%d1 |get ms mantissa
157 movel %d0,LOCAL_EX(%a1) |put the new exp back on the stack
158 movel LOCAL_HI(%a1),%d1 |get ms mantissa
161 movel %d1,LOCAL_HI(%a1) |build lower lword in memory
162 movel LOCAL_LO(%a1),%d1 |get ls mantissa
164 orl %d0,LOCAL_HI(%a1) |put them in double result
167 exg %a0,%a1 |a0=supervisor source, a1=user dest
175 | a1 -> source in extended precision
179 | a1 -> destroyed
203 movew LOCAL_EX(%a1),%d0 |get exponent
210 tstb LOCAL_SGN(%a1)
216 tstb LOCAL_SGN(%a1)
222 movel LOCAL_HI(%a1),%d1 |get ms mantissa
231 exg %a0,%a1 |a0=supervisor source, a1=user dest
244 tstb LOCAL_SGN(%a1) |put back sign into exponent word
246 bsetb #sign_bit,LOCAL_EX(%a1)
248 clrb LOCAL_SGN(%a1) |clear out the sign byte
251 exg %a0,%a1 |a0=supervisor source, a1=user dest