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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [sim/] [testsuite/] [sim/] [cr16/] [sbitw.cgs] - Blame information for rev 330

Details | Compare with Previous | View Log


# cr16 testcase for sbitw
# mach:  cr16
 
        .include "testutils.inc"
 
        start
 
       .global sbitw
sbitw:
        sbitw   $4,_y
        loadw   _y, r1
        cmpb    $0x1f, r1
        beq ok1
not_ok:
        fail
 
ok1:
        movd   $_y, (r1,r0)
        sbitw   $5,0(r1,r0)
        loadw   _y, r1
        cmpb    $0x3f, r1
        beq ok2
        br not_ok
ok2:
 
        movw   $_y, r1
        sbitw   $6,0(r1)
        loadw   _y, r1
        cmpb    $0x7f, r1
        beq ok3
        br not_ok
ok3:
        pass
 
_y:     .word   0x0f

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

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [sim/] [testsuite/] [sim/] [cr16/] [sbitw.cgs] - Blame information for rev 330