OpenCores
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/] [ashub_i.cgs] - Blame information for rev 330

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 330 jeremybenn
# cr16 testcase for ashub $sr,$dr
2
# mach(): cr16
3
 
4
        .include "testutils.inc"
5
 
6
        start
7
 
8
        .global ashub
9
ashub:
10
 
11
        movw  $0x12f1, r4
12
        ashub $4, r4
13
 
14
        cmpw $0x1210, r4
15
        beq ok
16
not_ok:
17
        fail
18
ok:
19
        movw  $0x12f1, r4
20
        ashub $-4, r4
21
 
22
        test_h_gr r4, 0x12ff
23
 
24
        pass

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.