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

Subversion Repositories openrisc

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

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

Line No. Rev Author Line
1 227 jeremybenn
# sh testcase for fcnvsd
2
# mach: sh
3
# as(sh):       -defsym sim_cpu=0
4
 
5
        .include "testutils.inc"
6
 
7
        start
8
        set_grs_a5a5
9
        set_fprs_a5a5
10
        double_prec
11
        fldi1   fr0
12
        flds    fr0, fpul
13
        fcnvsd  fpul, dr2
14
        assert_dpreg_i  1, dr2
15
 
16
        # Convert back.
17
        fcnvds  dr2, fpul
18
        fsts    fpul, fr1
19
        single_prec
20
        assert_fpreg_i  1, fr1
21
        fcmp/eq fr0, fr1
22
        bt      .L0
23
        fail
24
.L0:
25
        test_grs_a5a5
26
        test_fpr_a5a5   fr4
27
        test_fpr_a5a5   fr5
28
        test_fpr_a5a5   fr6
29
        test_fpr_a5a5   fr7
30
        test_fpr_a5a5   fr8
31
        test_fpr_a5a5   fr9
32
        test_fpr_a5a5   fr10
33
        test_fpr_a5a5   fr11
34
        test_fpr_a5a5   fr12
35
        test_fpr_a5a5   fr13
36
        test_fpr_a5a5   fr14
37
        test_fpr_a5a5   fr15
38
        pass
39
        exit 0
40
 

powered by: WebSVN 2.1.0

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