URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [cr16/] [cbitb.cgs] - Blame information for rev 227

Go to most recent revision | Details | Compare with Previous | View Log


# cr16 testcase for cbitb $bit_pos, ABS/REGP/REG
# mach:  cr16
 
        .include "testutils.inc"
 
        start
 
        .global cbitb
cbitb:
        cbitb   $0,_y
        loadw   _y, r1
        cmpb    $0xfe, r1
        beq ok1
not_ok:
        fail
 
ok1:
        movd   $_y, (r1,r0)
        cbitb   $1,0(r1,r0)
        loadw   _y, r1
        cmpb    $0xfc, r1
        beq ok2
        br not_ok
ok2:
 
        movw   $_y, r1
        cbitb   $2,0(r1)
        loadw   _y, r1
        cmpb    $0xf8, r1
        beq ok3
        br not_ok
ok3:
        pass
 
_y:     .word   0xff

Line No.	Rev	Author	Line
1	227	jeremybenn	`# cr16 testcase for cbitb $bit_pos, ABS/REGP/REG`
2			`# mach: cr16`
3
4			`.include "testutils.inc"`
5
6			`start`
7
8			`.global cbitb`
9			`cbitb:`
10			`cbitb $0,_y`
11			`loadw _y, r1`
12			`cmpb $0xfe, r1`
13			`beq ok1`
14			`not_ok:`
15			`fail`
16
17			`ok1:`
18			`movd $_y, (r1,r0)`
19			`cbitb $1,0(r1,r0)`
20			`loadw _y, r1`
21			`cmpb $0xfc, r1`
22			`beq ok2`
23			`br not_ok`
24			`ok2:`
25
26			`movw $_y, r1`
27			`cbitb $2,0(r1)`
28			`loadw _y, r1`
29			`cmpb $0xf8, r1`
30			`beq ok3`
31			`br not_ok`
32			`ok3:`
33			`pass`
34
35			`_y: .word 0xff`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [cr16/] [cbitb.cgs] - Blame information for rev 227