# sh testcase for stc gbr, $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32

	.include "compact/testutils.inc"

	start

	.global stc_gbr
stc_gbr:
	stc gbr, r1
	mov #42, r1
	ldc r1, gbr
	stc gbr, r2
	cmp/eq r1, r2
	bf wrong
okay:
	pass
wrong:
	fail