;  ###----------------------------------------------------------------###
;  # file	: lhi001.u						#
;  # date	: Jul 10 1995						#
;  # descr.	: functional test for mips				#
;  ###----------------------------------------------------------------###

	;  ###--------------------------------------------------------###
	;  #   load high immediate					#
	;  ###--------------------------------------------------------###

const		.equ	0x00ac

		.org	0x00400000
		.start	init

init:
		addiu	r24, r0 , const
		sll	r25, r24, 16

		lui	r23, const

		bne	r25, r23, good
		nop
		j	good
		nop


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