ifpsp060/src/isp.S

407 	mov.l		%usp,%a0		# fetch user stack pointer
423 # fetch the opword and first extension word pointed to by the stacked pc
426 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
428 	bsr.l		_imem_read_long		# fetch opword & extword
549 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
584 	mov.l		EXC_A7(%a6),%a0		# fetch user stack pointer
886 #	(An)	- fetch An value from stack				#
887 #	-(An)	- fetch An value from stack; return decr value;		#
891 #	(An)+	- fetch An value from stack; return value;		#
895 #	(d16,An) - fetch An value from stack; read d16 using		#
896 #		  _imem_read_word(); fetch may fail -> branch to	#
898 #	(xxx).w,(xxx).l - use _imem_read_{word,long}() to fetch		#
899 #		  address; fetch may fail				#
902 #	(d16,PC) - fetch stacked PC value; read d16 using		#
903 #		  _imem_read_word(); fetch may fail -> branch to	#
917 	mov.w		EXC_OPWORD(%a6),%d0	# fetch opcode word
924 	mov.w		(tbl_ea_mode.b,%pc,%d0.w*2), %d0 # fetch jmp distance
1218 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1230 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1242 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1254 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1266 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1278 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1290 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1302 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1322 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1324 	bsr.l		_imem_read_word		# fetch extword in d0
1350 	mov.l		(EXC_DREGS,%a6,%d1.w*4),%d1 # fetch index reg value
1379 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch extension word ptr
1386 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1388 	bsr.l		_imem_read_word		# fetch short address
1400 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1402 	bsr.l		_imem_read_long		# fetch long address
1414 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1416 	bsr.l		_imem_read_word		# fetch word displacement
1437 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1439 	bsr.l		_imem_read_word		# fetch ext word
1466 	mov.l		(EXC_DREGS,%a6,%d1.w*4),%d1 # fetch index reg value
1519 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1528 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1546 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1556 	mov.l		EXC_EXTWPTR(%a6),%a0	# fetch instruction addr
1652 	mov.w		EXC_OPWORD(%a6),%d1	# fetch the opcode word
1657 	mov.l		(EXC_AREGS,%a6,%d0.w*4),%a0 # fetch ay
1664 # reg2mem: fetch dx, then write it to memory
1670 	mov.l		(EXC_DREGS,%a6,%d0.w*4), %d0 # fetch dx
1875 #	First, calculate the effective address, then fetch the byte,	#
1885 #	If the memory fetch returns a failing value, pass the failing	#
1897 	mov.b		EXC_EXTWORD(%a6), %d0	# fetch hi extension word
1911 	bsr.l		_dmem_read_long		# fetch long lower bound
1919 	bsr.l		_dmem_read_long		# fetch long upper bound
1928 # the bounds are word size. fetch them in one subroutine call by
1933 	bsr.l		_dmem_read_long		# fetch 2 word bounds
1952 # the bounds are byte size. fetch them in one subroutine call by
1957 	bsr.l		_dmem_read_word		# fetch 2 byte bounds
1984 	mov.w		%cc, %d3		# fetch resulting ccodes
1989 	mov.w		%cc, %d4		# fetch resulting ccodes
1993 	mov.w		EXC_CC(%a6), %d4	# fetch old ccodes
2059 #	First, decode the operand location. If it's in Dn, fetch from	#
2061 # effective address. Use _dmem_read_long() to fetch at that address.	#
2094 	mov.l		(EXC_DREGS,%a6,%d0.w*4), %d7 # fetch divisor from register
2107 # fetch %dr and %dq directly off stack since all regs are saved there
2437 	bsr.l		_dmem_read_long		# fetch divisor from <ea>
2447 # if the fetch runs into some deadly fault.
2497 #	First, decode the operand location. If it's in Dn, fetch from	#
2499 # effective address. Use _dmem_read_long() to fetch at that address.	#
2520 # must extract the register number and fetch the operand from the stack.
2523 	mov.l		(EXC_DREGS,%a6,%d0.w*4), %d3 # fetch multiplier
2525 # multiplier is in %d3. now, extract Dl and Dh fields and fetch the
2528 	mov.w		EXC_EXTWORD(%a6), %d2	# fetch ext word
2638 	mov.w		%cc, %d7		# fetch %ccr to see if 'N' set
2642 	mov.b		EXC_CC+1(%a6), %d6	# fetch previous %ccr
2662 # must calculate the <ea> and go fetch the 32-bit operand.
2671 	bsr.l		_dmem_read_long		# fetch src from addr (%a0)
2682 # if the fetch runs into some deadly fault.
2741 #	Decode the instruction and fetch the appropriate Update and	#
2770 	mov.l		(EXC_DREGS,%a6,%d0.w*4),%a1 # fetch ADDR2
2777 	mov.l		(EXC_DREGS,%a6,%d1.w*4),%d5 # fetch Update2 Op
2780 	mov.l		(EXC_DREGS,%a6,%d0.w*4),%d3 # fetch Compare2 Op
2788 	mov.l		(EXC_DREGS,%a6,%d0.w*4),%a0 # fetch ADDR1
2795 	mov.l		(EXC_DREGS,%a6,%d1.w*4),%d4 # fetch Update1 Op
2798 	mov.l		(EXC_DREGS,%a6,%d0.w*4),%d2 # fetch Compare1 Op
2859 	mov.w		DC2(%a6),%d3		# fetch Dc2
2862 	mov.w		DC1(%a6),%d2		# fetch Dc1
2890 	mov.w		DC2(%a6),%d3		# fetch Dc2
2893 	mov.w		DC1(%a6),%d2		# fetch Dc1
2963 # instruction word and fetch the "compare" (DC) and "update" (Du)	#
3022 	mov.w		EXC_EXTWORD(%a6),%d0	# fetch cas extension word
3207 #	(7) Pre-fetch the core emulation instructions by executing	#
3345 	movs.l		(%a1),%d1		# fetch Dest2[31:0]
3346 	movs.l		(%a0),%d0		# fetch Dest1[31:0]
3436 	movs.l		(%a1),%d1		# fetch Dest2[31:0]
3437 	movs.l		(%a0),%d0		# fetch Dest1[31:0]
3496 	movs.l		(%a1),%d1		# fetch Dest2[31:0]
3497 	movs.l		(%a0),%d0		# fetch Dest1[31:0]
3645 	movs.w		(%a1),%d1		# fetch Dest2[15:0]
3646 	movs.w		(%a0),%d0		# fetch Dest1[15:0]
3736 	movs.w		(%a1),%d1		# fetch Dest2[15:0]
3737 	movs.w		(%a0),%d0		# fetch Dest1[15:0]
3824 #	(6) Pre-fetch the core emulation instructions by executing one	#
3936 	movs.w		(%a0),%d0		# fetch Dest[15:0]
4092 	movs.l		(%a0),%d0		# fetch Dest[31:0]
4240 	movs.l		(%a0),%d0		# fetch Dest[31:0]