Lines Matching refs:A6
286 set EXC_A6, EXC_AREGS+(6*4) # offset of a6
409 link.w %a6,&-LOCAL_SIZE # create room for stack frame
411 movm.l &0x3fff,EXC_DREGS(%a6) # store d0-d7/a0-a5
412 mov.l (%a6),EXC_A6(%a6) # store a6
414 btst &0x5,EXC_ISR(%a6) # from s or u mode?
418 mov.l %a0,EXC_A7(%a6) # store a7
421 lea 0xc(%a6),%a0
422 mov.l %a0,EXC_A7(%a6) # store corrected sp
427 clr.b SPCOND_FLG(%a6) # clear "special case" flag
429 mov.w EXC_ISR(%a6),EXC_CC(%a6) # store cc copy on stack
430 mov.l EXC_IPC(%a6),EXC_EXTWPTR(%a6) # store extwptr on stack
436 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
437 addq.l &0x4,EXC_EXTWPTR(%a6) # incr instruction ptr
439 mov.l %d0,EXC_OPWORD(%a6) # store extword on stack
492 btst &0x5,EXC_ISR(%a6) # supervisor mode?
494 btst &mia7_bit,SPCOND_FLG(%a6) # was a7 changed?
496 btst &0x7,EXC_ISR(%a6) # is trace enabled?
507 btst &mia7_bit,SPCOND_FLG(%a6) # was a7 changed?
510 btst &idbyz_bit,SPCOND_FLG(%a6) # did divide-by-zero occur?
514 btst &0x5,EXC_ISR(%a6) # supervisor mode?
522 btst &idbyz_bit,SPCOND_FLG(%a6) # did divide-by-zero occur?
524 tst.b EXC_ISR(%a6) # no; is trace enabled?
559 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
560 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
575 cmpi.b SPCOND_FLG(%a6),&ichk_flg
586 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
591 btst &0x5,EXC_ISR(%a6) # user or supervisor?
594 mov.l EXC_A7(%a6),%a0 # fetch user stack pointer
598 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
600 btst &0x7,EXC_ISR(%a6) # is trace mode on?
603 mov.l EXC_EXTWPTR(%a6),EXC_IPC(%a6) # new pc on stack frame
604 mov.l EXC_A6(%a6),(%a6) # prepare new a6 for unlink
605 unlk %a6 # unlink stack frame
625 # from link -->* A6 * * SR *
628 # / * * * A6 *
634 mov.l EXC_A6(%a6),-0x4(%a6)
635 mov.w EXC_ISR(%a6),0x0(%a6)
636 mov.l EXC_IPC(%a6),0x8(%a6)
637 mov.l EXC_EXTWPTR(%a6),0x2(%a6)
638 mov.w &0x2024,0x6(%a6)
639 sub.l &0x4,%a6
640 unlk %a6
663 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
664 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
666 mov.w EXC_ISR(%a6),(%a6) # put new SR on stack
667 mov.l EXC_IPC(%a6),0x8(%a6) # put "Current PC" on stack
668 mov.l EXC_EXTWPTR(%a6),0x2(%a6) # put "Next PC" on stack
669 mov.w &0x2018,0x6(%a6) # put Vector Offset on stack
671 mov.l EXC_A6(%a6),%a6 # restore a6
697 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
698 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
700 mov.w EXC_ISR(%a6),(%a6) # put new SR on stack
701 mov.l EXC_IPC(%a6),0x8(%a6) # put "Current PC" on stack
702 mov.l EXC_EXTWPTR(%a6),0x2(%a6) # put "Next PC" on stack
703 mov.w &0x2014,0x6(%a6) # put Vector Offset on stack
705 mov.l EXC_A6(%a6),%a6 # restore a6
734 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
735 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
737 mov.l EXC_IPC(%a6),0xc(%a6) # put "Current PC" on stack
738 mov.w &0x2014,0xa(%a6) # put Vector Offset on stack
739 mov.l EXC_EXTWPTR(%a6),0x6(%a6) # put "Next PC" on stack
741 mov.l EXC_A6(%a6),%a6 # restore a6
772 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
773 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
775 mov.l EXC_IPC(%a6),0xc(%a6) # put "Current PC" on stack
776 mov.w &0x2024,0xa(%a6) # put Vector Offset on stack
777 mov.l EXC_EXTWPTR(%a6),0x6(%a6) # put "Next PC" on stack
779 mov.l EXC_A6(%a6),%a6 # restore a6
799 mov.b EXC_CC+1(%a6),EXC_ISR+1(%a6) # insert new ccodes
800 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
802 mov.w &0x00f4,0xe(%a6) # put Vector Offset on stack
803 mov.l EXC_EXTWPTR(%a6),0xa(%a6) # put "Next PC" on stack
804 mov.w EXC_ISR(%a6),0x8(%a6) # put SR on stack
806 mov.l EXC_A6(%a6),%a6 # restore a6
816 mov.l %a0,(%a6) # save address
817 mov.l %d0,-0x4(%a6) # save partial fslw
819 lea -64(%a6),%sp
820 movm.l (%sp)+,&0x7fff # restore d0-d7/a0-a6
839 movm.l EXC_DREGS(%a6),&0x3fff # restore d0-d7/a0-a5
840 unlk %a6 # unlink frame
858 cmpi.b SPCOND_FLG(%a6),&restore_flg # do we need a restore?
861 mov.b EXC_SAVREG(%a6),%d0 # regno to restore
862 mov.l EXC_SAVVAL(%a6),(EXC_AREGS,%a6,%d0.l*4) # restore value
927 mov.w EXC_OPWORD(%a6),%d0 # fetch opcode word
1015 mov.l EXC_A0(%a6),%a0 # Get current a0
1019 mov.l EXC_A1(%a6),%a0 # Get current a1
1023 mov.l EXC_A2(%a6),%a0 # Get current a2
1027 mov.l EXC_A3(%a6),%a0 # Get current a3
1031 mov.l EXC_A4(%a6),%a0 # Get current a4
1035 mov.l EXC_A5(%a6
1039 mov.l EXC_A6(%a6),%a0 # Get current a6
1043 mov.l EXC_A7(%a6),%a0 # Get current a7
1051 mov.l EXC_A0(%a6),%a0 # load current value
1053 mov.l %d0,EXC_A0(%a6) # save incremented value
1055 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1056 mov.b &0x0,EXC_SAVREG(%a6) # save regno, too
1057 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1062 mov.l EXC_A1(%a6),%a0 # load current value
1064 mov.l %d0,EXC_A1(%a6) # save incremented value
1066 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1067 mov.b &0x1,EXC_SAVREG(%a6) # save regno, too
1068 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1073 mov.l EXC_A2(%a6),%a0 # load current value
1075 mov.l %d0,EXC_A2(%a6) # save incremented value
1077 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1078 mov.b &0x2,EXC_SAVREG(%a6) # save regno, too
1079 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1084 mov.l EXC_A3(%a6),%a0 # load current value
1086 mov.l %d0,EXC_A3(%a6) # save incremented value
1088 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1089 mov.b &0x3,EXC_SAVREG(%a6) # save regno, too
1090 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1095 mov.l EXC_A4(%a6),%a0 # load current value
1097 mov.l %d0,EXC_A4(%a6) # save incremented value
1099 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1100 mov.b &0x4,EXC_SAVREG(%a6) # save regno, too
1101 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1106 mov.l EXC_A5(%a6),%a0 # load current value
1108 mov.l %d0,EXC_A5(%a6) # save incremented value
1110 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1111 mov.b &0x5,EXC_SAVREG(%a6) # save regno, too
1112 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1117 mov.l EXC_A6(%a6),%a0 # load current value
1119 mov.l %d0,EXC_A6(%a6) # save incremented value
1121 mov.l %a0,EXC_SAVVAL(%a6) # save in case of access error
1122 mov.b &0x6,EXC_SAVREG(%a6) # save regno, too
1123 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1127 mov.b &mia7_flg,SPCOND_FLG(%a6) # set "special case" flag
1130 mov.l EXC_A7(%a6),%a0 # load current value
1132 mov.l %d0,EXC_A7(%a6) # save incremented value
1139 mov.l EXC_A0(%a6),%d0 # Get current a0
1140 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1142 mov.l %d0,EXC_A0(%a6) # Save decr value
1145 mov.b &0x0,EXC_SAVREG(%a6) # save regno, too
1146 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1150 mov.l EXC_A1(%a6),%d0 # Get current a1
1151 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1153 mov.l %d0,EXC_A1(%a6) # Save decr value
1156 mov.b &0x1,EXC_SAVREG(%a6) # save regno, too
1157 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1161 mov.l EXC_A2(%a6),%d0 # Get current a2
1162 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1164 mov.l %d0,EXC_A2(%a6) # Save decr value
1167 mov.b &0x2,EXC_SAVREG(%a6) # save regno, too
1168 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1172 mov.l EXC_A3(%a6),%d0 # Get current a3
1173 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1175 mov.l %d0,EXC_A3(%a6) # Save decr value
1178 mov.b &0x3,EXC_SAVREG(%a6) # save regno, too
1179 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1183 mov.l EXC_A4(%a6),%d0 # Get current a4
1184 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1186 mov.l %d0,EXC_A4(%a6) # Save decr value
1189 mov.b &0x4,EXC_SAVREG(%a6) # save regno, too
1190 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1194 mov.l EXC_A5(%a6),%d0 # Get current a5
1195 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1197 mov.l %d0,EXC_A5(%a6) # Save decr value
1200 mov.b &0x5,EXC_SAVREG(%a6) # save regno, too
1201 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1205 mov.l EXC_A6(%a6),%d0 # Get current a6
1206 mov.l %d0,EXC_SAVVAL(%a6) # save in case of access error
1208 mov.l %d0,EXC_A6(%a6) # Save decr value
1211 mov.b &0x6,EXC_SAVREG(%a6) # save regno, too
1212 mov.b &restore_flg,SPCOND_FLG(%a6) # set flag
1216 mov.b &mda7_flg,SPCOND_FLG(%a6) # set "special case" flag
1218 mov.l EXC_A7(%a6),%d0 # Get current a7
1220 mov.l %d0,EXC_A7(%a6) # Save decr value
1228 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1229 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1236 add.l EXC_A0(%a6),%a0 # a0 + d16
1240 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1241 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1248 add.l EXC_A1(%a6),%a0 # a1 + d16
1252 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1253 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1260 add.l EXC_A2(%a6),%a0 # a2 + d16
1264 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1265 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1272 add.l EXC_A3(%a6),%a0 # a3 + d16
1276 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1277 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1284 add.l EXC_A4(%a6),%a0 # a4 + d16
1288 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1289 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1296 add.l EXC_A5(%a6),%a0 # a5 + d16
1300 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1301 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1308 add.l EXC_A6(%a6),%a0 # a6 + d16
1312 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1313 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1320 add.l EXC_A7(%a6),%a0 # a7 + d16
1332 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1333 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1341 mov.l (EXC_AREGS,%a6,%d1.w*4),%a0 # put base in a0
1360 mov.l (EXC_DREGS,%a6,%d1.w*4),%d1 # fetch index reg value
1387 mov.b &immed_flg,SPCOND_FLG(%a6) # set immediate flag
1389 mov.l EXC_EXTWPTR(%a6),%a0 # fetch extension word ptr
1396 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1397 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1410 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1411 addq.l &0x4,EXC_EXTWPTR(%a6) # incr instruction ptr
1424 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1425 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1433 add.l EXC_EXTWPTR(%a6),%a0 # pc + d16
1447 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1448 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1454 mov.l EXC_EXTWPTR(%a6),%a0 # put base in a0
1476 mov.l (EXC_DREGS,%a6,%d1.w*4),%d1 # fetch index reg value
1511 mov.l (EXC_DREGS,%a6,%d2.w*4),%d2
1529 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1530 addq.l &0x4,EXC_EXTWPTR(%a6) # incr instruction ptr
1538 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1539 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1556 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1557 addq.l &0x4,EXC_EXTWPTR(%a6) # incr instruction ptr
1566 mov.l EXC_EXTWPTR(%a6),%a0 # fetch instruction addr
1567 addq.l &0x2,EXC_EXTWPTR(%a6) # incr instruction ptr
1662 mov.w EXC_OPWORD(%a6),%d1 # fetch the opcode word
1667 mov.l (EXC_AREGS,%a6,%d0.w*4),%a0 # fetch ay
1669 add.w EXC_EXTWORD(%a6),%a0 # add: an + sgn_ext(disp)
1680 mov.l (EXC_DREGS,%a6,%d0.w*4), %d0 # fetch dx
1803 mov.b EXC_OPWORD(%a6),%d1
1807 mov.l %d2,(EXC_DREGS,%a6,%d1.w*4) # store dx
1833 mov.b EXC_OPWORD(%a6),%d1
1837 mov.w %d2,(EXC_DREGS+2,%a6,%d1.w*4) # store dx
1907 mov.b EXC_EXTWORD(%a6), %d0 # fetch hi extension word
1911 mov.l (EXC_DREGS,%a6,%d0.w*4), %d2 # get regval
1913 cmpi.b EXC_OPWORD(%a6), &0x2 # what size is operation?
1954 btst &0x7, EXC_EXTWORD(%a6) # address compare?
1978 btst &0x7, EXC_EXTWORD(%a6) # address compare?
2003 mov.w EXC_CC(%a6), %d4 # fetch old ccodes
2006 mov.w %d4, EXC_CC(%a6) # save new ccodes
2008 btst &0x3, EXC_EXTWORD(%a6) # separate chk2,cmp2
2021 mov.b &ichk_flg,SPCOND_FLG(%a6) # set "special case" flag
2097 mov.b EXC_OPWORD+1(%a6), %d0
2102 mov.b EXC_OPWORD+1(%a6), %d0 # extract Dn from opcode
2104 mov.l (EXC_DREGS,%a6,%d0.w*4), %d7 # fetch divisor from register
2109 mov.b EXC_EXTWORD+1(%a6), %d0 # extract Dr from extword
2110 mov.b EXC_EXTWORD(%a6), %d1 # extract Dq from extword
2114 mov.w %d0, NDRSAVE(%a6) # save Dr for later
2115 mov.w %d1, NDQSAVE(%a6) # save Dq for later
2118 mov.l (EXC_DREGS,%a6,%d0.w*4), %d5 # get dividend hi
2119 mov.l (EXC_DREGS,%a6,%d1.w*4), %d6 # get dividend lo
2122 btst &0x3, EXC_EXTWORD(%a6) # signed or unsigned?
2128 slt NDIVISOR(%a6) # save sign of divisor
2136 slt NDIVIDEND(%a6) # save sign of dividend
2175 btst &0x3, EXC_EXTWORD(%a6) # do divs, divu separately
2179 tst.b NDIVIDEND(%a6) # remainder has same sign
2183 mov.b NDIVISOR(%a6), %d0
2184 eor.b %d0, NDIVIDEND(%a6) # chk if quotient is negative
2202 mov.w EXC_CC(%a6), %cc
2204 mov.w %cc, EXC_CC(%a6)
2206 mov.w NDRSAVE(%a6), %d0 # get Dr off stack
2207 mov.w NDQSAVE(%a6), %d1 # get Dq off stack
2211 mov.l %d5, (EXC_DREGS,%a6,%d0.w*4) # save remainder
2212 mov.l %d6, (EXC_DREGS,%a6,%d1.w*4) # save quotient
2217 bset &0x1, EXC_CC+1(%a6) # 'V' set on overflow
2218 bclr &0x0, EXC_CC+1(%a6) # 'C' cleared on overflow
2223 andi.b &0x1e, EXC_CC+1(%a6) # clear 'C' bit on divbyzero
2224 ori.b &idbyz_flg,SPCOND_FLG(%a6) # set "special case" flag
2287 clr.l DDNORMAL(%a6) # count of shifts for normalization
2288 clr.b DDSECOND(%a6) # clear flag for quotient digits
2293 addq.l &0x1, DDNORMAL(%a6) # count normalization shifts
2376 tst.b DDSECOND(%a6) # both q words done?
2380 mov.w %d1, DDQUOTIENT(%a6)
2386 st DDSECOND(%a6) # second digit
2390 mov.w %d1, DDQUOTIENT+2(%a6)
2395 mov.l DDNORMAL(%a6), %d7 # get norm shift count
2404 mov.l DDQUOTIENT(%a6), %d6 # quotient
2443 cmpi.b SPCOND_FLG(%a6),&immed_flg # immediate addressing mode?
2459 addq.l &0x4,EXC_EXTWPTR(%a6)
2525 mov.b EXC_OPWORD+1(%a6), %d0 # extract src {mode,reg}
2533 mov.l (EXC_DREGS,%a6,%d0.w*4), %d3 # fetch multiplier
2538 mov.w EXC_EXTWORD(%a6), %d2 # fetch ext word
2544 mov.l (EXC_DREGS,%a6,%d2.w*4), %d4 # get multiplicand
2555 clr.b EXC_TEMP(%a6) # clear temp space
2556 btst &0x3, EXC_EXTWORD(%a6) # signed or unsigned?
2562 ori.b &0x1, EXC_TEMP(%a6) # save multiplier sgn
2569 eori.b &0x1, EXC_TEMP(%a6) # calculate correct sign
2625 tst.b EXC_TEMP(%a6) # should result be signed?
2642 mov.l %d3, (EXC_DREGS,%a6,%d2.w*4) # save lo(result)
2644 mov.l %d4, (EXC_DREGS,%a6,%d1.w*4) # save hi(result)
2652 mov.b EXC_CC+1(%a6), %d6 # fetch previous %ccr
2656 mov.b %d6, EXC_CC+1(%a6) # save new %ccr
2663 clr.l (EXC_DREGS,%a6,%d2.w*4) # save lo(result)
2664 clr.l (EXC_DREGS,%a6,%d1.w*4) # save hi(result)
2677 cmpi.b SPCOND_FLG(%a6),&immed_flg # immediate addressing mode?
2694 addq.l &0x4,EXC_EXTWPTR(%a6)
2775 mov.l %d0,EXC_TEMP+0x4(%a6) # store for possible restart
2780 mov.l (EXC_DREGS,%a6,%d0.w*4),%a1 # fetch ADDR2
2781 mov.l %a1,ADDR2(%a6)
2787 mov.l (EXC_DREGS,%a6,%d1.w*4),%d5 # fetch Update2 Op
2790 mov.l (EXC_DREGS,%a6,%d0.w*4),%d3 # fetch Compare2 Op
2791 mov.w %d0,DC2(%a6)
2793 mov.w EXC_EXTWORD(%a6),%d0
2798 mov.l (EXC_DREGS,%a6,%d0.w*4),%a0 # fetch ADDR1
2799 mov.l %a0,ADDR1(%a6)
2805 mov.l (EXC_DREGS,%a6,%d1.w*4),%d4 # fetch Update1 Op
2808 mov.l (EXC_DREGS,%a6,%d0.w*4),%d2 # fetch Compare1 Op
2809 mov.w %d0,DC1(%a6)
2811 btst &0x1,EXC_OPWORD(%a6) # word or long?
2814 btst &0x5,EXC_ISR(%a6) # user or supervisor?
2856 btst &0x1,EXC_OPWORD(%a6)
2859 mov.w EXC_CC(%a6),%cc # load old ccodes
2864 mov.w %cc,EXC_CC(%a6) # save new ccodes
2869 mov.w DC2(%a6),%d3 # fetch Dc2
2870 mov.w %d1,(2+EXC_DREGS,%a6,%d3.w*4) # store new Compare2 Op
2872 mov.w DC1(%a6),%d2 # fetch Dc1
2873 mov.w %d0,(2+EXC_DREGS,%a6,%d2.w*4) # store new Compare1 Op
2876 btst &0x5,EXC_ISR(%a6)
2880 mov.l ADDR1(%a6),%a0 # pass ADDR1
2885 mov.l ADDR2(%a6),%a0 # pass ADDR2
2890 mov.w EXC_CC(%a6),%cc # load old ccodes
2895 mov.w %cc,EXC_CC(%a6) # save new ccodes
2900 mov.w DC2(%a6),%d3 # fetch Dc2
2901 mov.l %d1,(EXC_DREGS,%a6,%d3.w*4) # store new Compare2 Op
2903 mov.w DC1(%a6),%d2 # fetch Dc1
2904 mov.l %d0,(EXC_DREGS,%a6,%d2.w*4) # store new Compare1 Op
2907 btst &0x5,EXC_ISR(%a6)
2911 mov.l ADDR1(%a6),%a0 # pass ADDR1
2916 mov.l ADDR2(%a6),%a0 # pass ADDR2
2923 mov.l EXC_TEMP+0x4(%a6),%d0
3015 btst &0x1,EXC_OPWORD(%a6) # word or long operation?
3021 mov.l %a0,ADDR(%a6) # save <ea> for possible restart
3028 mov.l %a0,ADDR(%a6) # save <ea> for possible restart
3032 mov.w EXC_EXTWORD(%a6),%d0 # fetch cas extension word
3037 mov.l (EXC_DREGS,%a6,%d0.w*4),%d2 # get update operand
3040 mov.l (EXC_DREGS,%a6,%d1.w*4),%d4 # get compare operand
3041 mov.w %d1,DC(%a6) # save Dc
3043 btst &0x5,EXC_ISR(%a6) # which mode for exception?
3059 btst &0x1,EXC_OPWORD(%a6)
3065 mov.w EXC_CC(%a6),%cc # restore cc
3067 mov.w %cc,EXC_CC(%a6) # save cc
3072 mov.w DC(%a6),%d3
3073 mov.w %d0,(EXC_DREGS+2,%a6,%d3.w*4) # Dc = destination
3076 mov.l ADDR(%a6),%a0 # pass addr
3078 btst &0x5,EXC_ISR(%a6)
3086 mov.w EXC_CC(%a6),%cc # restore cc
3088 mov.w %cc,EXC_CC(%a6) # save cc
3093 mov.w DC(%a6),%d3
3094 mov.l %d0,(EXC_DREGS,%a6,%d3.w*4) # Dc = destination
3097 mov.l ADDR(%a6),%a0 # pass addr
3099 btst &0x5,EXC_ISR(%a6)
3111 cmpi.b EXC_OPWORD+1(%a6),&0xfc # cas or cas2?
3114 mov.l ADDR(%a6),%a0 # load <ea>
3115 btst &0x1,EXC_OPWORD(%a6) # word or long operation?
3137 subq.l &0x8,%a6 # shift frame ptr down, too
3145 mov.w &0x4008,EXC_IVOFF(%a6) # put new stk fmt, voff
3146 mov.l %a2,EXC_IVOFF+0x2(%a6) # put faulting addr on stack
3147 mov.l %d0,EXC_IVOFF+0x6(%a6) # put FSLW on stack
3148 movm.l EXC_DREGS(%a6),&0x3fff # restore user regs
3149 unlk %a6 # unlink stack frame
3256 # A6 = frame pointer #
3414 # A6 = frame pointer #
3714 # A6 = frame pointer #
3873 # A6 = frame pointer #
4013 # A6 = frame pointer #
4169 # A6 = frame pointer #
Indexes created Wed Oct 22 13:09:56 GMT 2025