File: sra001.u

package info (click to toggle)
alliance 5.0-20120515-1
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 70,180 kB
  • sloc: ansic: 350,295; vhdl: 34,227; yacc: 27,122; sh: 12,416; cpp: 9,478; makefile: 7,055; lex: 3,684
file content (33 lines) | stat: -rw-r--r-- 737 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
;  ###----------------------------------------------------------------###
;  # file	: sra001.u						#
;  # date	: Jul  7 1995						#
;  # descr.	: functional test for mips				#
;  ###----------------------------------------------------------------###

	;  ###--------------------------------------------------------###
	;  #   shift right arithmetical immediate			#
	;  ###--------------------------------------------------------###

shift_nbr	.equ	12
data		.equ	0x4570

		.org	0x00400000
		.start	init

init:
		addiu	r14, r0 , data
		sra 	r14, r14, shift_nbr 

		addiu	r12, r0, (data >> shift_nbr)
		beq	r12, r14,good
		nop
		j	bad
		nop

		.org	0x004000d0
good:		j	good
		nop
bad:		j	bad
		nop
		.end