Add support to GDB for the Renesas rl78 architecture.
[external/binutils.git] / sim / testsuite / sim / sh64 / media / fiprs.cgs
1 # sh testcase for fipr.s $fvg, $fvh, $frf -*- Asm -*-
2 # mach: all
3 # as: -isa=shmedia
4 # ld: -m shelf64
5
6         .include "media/testutils.inc"
7
8         .macro _load val, fpreg
9         # This macro clobbers r0.
10         movi \val, r0
11         fmov.ls r0, \fpreg 
12         float.ls \fpreg, \fpreg
13         .endm
14
15         start
16
17         .global fiprs
18 init:
19         pta wrong, tr0
20
21         _load 1, fr0
22         _load 2, fr1
23         _load 3, fr2
24         _load 4, fr3
25         _load 1, fr4
26         _load 2, fr5
27         _load 3, fr6
28         _load 4, fr7
29
30 fiprs:
31         fipr.s fv0, fv4, fr9
32
33 check:
34         _load 30, fr10
35         fcmpeq.s fr9, fr10, r7
36         bnei r7, 1, tr0
37
38 okay:
39         pass
40
41 wrong:
42         fail