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

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh/] [fcnvds.s] - Blame information for rev 26

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 26 jlechner 
# 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.