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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [sh/] [fcnvds.s] - Blame information for rev 227

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

Line No. Rev Author Line
1 227 jeremybenn
# sh testcase for fcnvds
2
# mach: sh
3
# as(sh):       -defsym sim_cpu=0
4
 
5
        .include "testutils.inc"
6
 
7
        start
8
        double_prec
9
        sz_64
10
        set_grs_a5a5
11
        set_fprs_a5a5
12
        mov.l   ax, r0
13
        fmov    @r0, dr0
14
        fcnvds dr0, fpul
15
        fsts    fpul, fr2
16
 
17
        assert_dpreg_i  5, dr0
18
        single_prec
19
        assert_fpreg_i  5, fr2
20
        test_fpr_a5a5   fr3
21
        test_fpr_a5a5   fr4
22
        test_fpr_a5a5   fr5
23
        test_fpr_a5a5   fr6
24
        test_fpr_a5a5   fr7
25
        test_fpr_a5a5   fr8
26
        test_fpr_a5a5   fr9
27
        test_fpr_a5a5   fr10
28
        test_fpr_a5a5   fr11
29
        test_fpr_a5a5   fr12
30
        test_fpr_a5a5   fr13
31
        test_fpr_a5a5   fr14
32
        test_fpr_a5a5   fr15
33
 
34
        assertreg0      x
35
        test_gr_a5a5    r1
36
        test_gr_a5a5    r2
37
        test_gr_a5a5    r3
38
        test_gr_a5a5    r4
39
        test_gr_a5a5    r5
40
        test_gr_a5a5    r6
41
        test_gr_a5a5    r7
42
        test_gr_a5a5    r8
43
        test_gr_a5a5    r9
44
        test_gr_a5a5    r10
45
        test_gr_a5a5    r11
46
        test_gr_a5a5    r12
47
        test_gr_a5a5    r13
48
        test_gr_a5a5    r14
49
 
50
        pass
51
        exit 0
52
 
53
        .align 2
54
x:      .double 5.0
55
ax:     .long   x
56
 

powered by: WebSVN 2.1.0

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