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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [cr16/] [jal.cgs] - Diff between revs 816 and 834

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 816 Rev 834
# cr16 testcase for jal $sr
# cr16 testcase for jal $sr
# mach(): cr16
# mach(): cr16
        .include "testutils.inc"
        .include "testutils.inc"
        start
        start
        .global jal
        .global jal
jal:
jal:
        movd $ok1, (r5, r4)
        movd $ok1, (r5, r4)
        lshd $-1, (r5,r4)
        lshd $-1, (r5,r4)
        jal (ra), (r5,r4)
        jal (ra), (r5,r4)
not_ok:
not_ok:
        fail
        fail
ok1:
ok1:
        movd $not_ok, (r7, r6)
        movd $not_ok, (r7, r6)
        lshd $-1, (r7,r6)
        lshd $-1, (r7,r6)
        cmpd (r7,r6), (ra)
        cmpd (r7,r6), (ra)
        beq ok2
        beq ok2
        br not_ok
        br not_ok
ok2:
ok2:
        movd $ok3, (r5, r4)
        movd $ok3, (r5, r4)
        lshd $-1, (r5,r4)
        lshd $-1, (r5,r4)
        jal (r1,r0), (r5,r4)
        jal (r1,r0), (r5,r4)
not_ok1:
not_ok1:
        br not_ok
        br not_ok
ok3:
ok3:
        movd $not_ok1, (r7, r6)
        movd $not_ok1, (r7, r6)
        lshd $-1, (r7,r6)
        lshd $-1, (r7,r6)
        cmpd (r7,r6), (r1,r0)
        cmpd (r7,r6), (r1,r0)
        beq ok4
        beq ok4
        br not_ok
        br not_ok
ok4:
ok4:
        pass
        pass
 
 

powered by: WebSVN 2.1.0

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