1# frv testcase for udiv $GRi,$GRj,$GRk 2# mach: frv fr500 fr400 3 4 .include "testutils.inc" 5 6 start 7 8 .global udiv 9udiv: 10 ; simple division 12 / 3 11 set_gr_immed 0x00000003,gr2 12 set_gr_immed 0x0000000c,gr3 13 udiv gr3,gr2,gr3 14 test_gr_immed 0x00000003,gr2 15 test_gr_immed 0x00000004,gr3 16 17 ; example 1 from udiv in the fr30 manual 18 set_gr_limmed 0x0123,0x4567,gr2 19 set_gr_limmed 0xfedc,0xba98,gr3 20 udiv gr3,gr2,gr3 21 test_gr_limmed 0x0123,0x4567,gr2 22 test_gr_immed 0x000000e0,gr3 23 24 ; set up exception handler 25 set_psr_et 1 26 and_spr_immed -4081,tbr ; clear tbr.tt 27 set_gr_spr tbr,gr17 28 inc_gr_immed 0x170,gr17 ; address of exception handler 29 set_bctrlr_0_0 gr17 30 set_spr_immed 128,lcr 31 set_gr_immed 0,gr15 32 33 ; divide by zero 34 set_spr_addr ok1,lr 35 set_gr_addr e1,gr17 36e1: udiv gr1,gr0,gr2 ; divide by zero 37 test_gr_immed 1,gr15 38 39 pass 40 41ok1: ; exception handler for divide by zero 42 test_spr_bits 0x18,3,0x1,isr ; isr.dtt is set 43 test_spr_gr epcr0,gr17 ; return address set 44 test_spr_bits 0x0001,0,0x1,esr0 ; esr0 is valid 45 test_spr_bits 0x003e,1,0x13,esr0 ; esr0.ec is set 46 inc_gr_immed 1,gr15 47 rett 0 48 fail 49