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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [sim/] [testsuite/] [sim/] [arm/] [xscale/] [miaph.cgs] - Blame information for rev 330

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 330 jeremybenn
# XSCALE testcase for MIAPH
2
# mach: xscale
3
# as: -mcpu=xscale
4
 
5
        .include "testutils.inc"
6
 
7
        start
8
 
9
        .global miaph
10
miaph:
11
        # Enable access to CoProcessors 0 & 1 before
12
        # we attempt these instructions.
13
 
14
        mvi_h_gr   r1, 3
15
        mcr        p15, 0, r1, cr15, cr1, 0
16
 
17
        # Test Multilply Accumulate
18
 
19
        mvi_h_gr   r0, 0x11223344
20
        mvi_h_gr   r1, 0x55667788
21
        mvi_h_gr   r2, 0x12345678
22
        mvi_h_gr   r3, 0x9abcdef0
23
 
24
        mar        acc0, r0, r1
25
 
26
        miaph      acc0, r2, r3
27
 
28
        mra        r0, r1, acc0
29
 
30
        test_h_gr  r0, 0xfec3f9f4
31
        test_h_gr  r1, 0x55667787
32
        test_h_gr  r2, 0x12345678
33
        test_h_gr  r3, 0x9abcdef0
34
 
35
        pass

powered by: WebSVN 2.1.0

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