# HiBit(r3:LONG)(LONG)

	.text
	.global	_HiBit

_HiBit:
	li	r4,31
.loop:	li	r5,1
	slw	r5,r5,r4
	and.	r0,r3,r5
	bne	.finish
	subi	r4,r4,1
	mr.	r4,r4
	bge	.loop
.finish:	mr	r3,r4
	blr

	.type	_HiBit,@function
	.size	_HiBit,$-_HiBit