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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [negc.cgs] - Blame information for rev 227

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 227 jeremybenn 
# sh testcase for negc $rm, $rn -*- Asm -*-
2 
# mach: all
3 
# as: -isa=shcompact
4 
# ld: -m shelf32
5 
 
6 
        .include "compact/testutils.inc"
7 
 
8 
        .macro signbit sign
9 
        mov r1, r2
10 
        shlr16 r2
11 
        shlr8 r2
12 
        shlr r2
13 
        shlr r2
14 
        shlr r2
15 
        shlr r2
16 
        shlr r2
17 
        shlr r2
18 
        shlr r2
19 
        assert r2, \sign
20 
        .endm
21 
        start
22 
 
23 
        .global negc
24 
negc:
25 
        clrt
26 
        mov #1, r0
27 
        negc r0, r1
28 
        signbit #1
29 
 
30 
negc2:
31 
        sett
32 
        mov #1, r0
33 
        negc r0, r1
34 
        signbit #1
35 
 
36 
negc3:
37 
        clrt
38 
        mov #0, r0
39 
        negc r0, r1
40 
        signbit #0
41 
 
42 
negc4:
43 
        sett
44 
        mov #0, r0
45 
        negc r0, r1
46 
        signbit #1
47 
 
48 
negc5:
49 
        clrt
50 
        mov #0, r0
51 
        or #255, r0
52 
        negc r0, r1
53 
        signbit #1
54 
 
55 
negc6:
56 
        sett
57 
        mov #0, r0
58 
        or #255, r0
59 
        negc r0, r1
60 
        signbit #1
61 
 
62 
okay:
63 
        pass
64 
 
65 
wrong:
66 
        fail

powered by: WebSVN 2.1.0

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