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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [nfitos.cgs] - Rev 840

Compare with Previous | Blame | View Log

# frv testcase for nfitos $FRj,$FRk
# mach: fr500 fr550 frv

        .include "testutils.inc"

        float_constants
        start
        load_float_constants

        .global nfitos
nfitos:
        set_fr_iimmed   0,0,fr1
        nfitos          fr1,fr1
        test_fr_fr      fr1,fr16
        test_fr_fr      fr1,fr20
        test_spr_immed  0,fner1
        test_spr_immed  0,fner0

        set_fr_iimmed   0x0000,0x0002,fr1
        nfitos          fr1,fr1
        test_fr_fr      fr1,fr32
        test_spr_immed  0,fner1
        test_spr_immed  0,fner0

        set_fr_iimmed   0xdead,0xbeef,fr1
        nfitos          fr1,fr1
        test_fr_iimmed  0xce054904,fr1
        test_spr_immed  0,fner1
        test_spr_immed  0,fner0

        ; These were an attempt to cause overflow
        set_fr_iimmed   0x7fff,0xffff,fr1
        nfitos          fr1,fr1
        test_fr_iimmed  0x4f000000,fr1
        test_spr_immed  0,fner1
        test_spr_immed  0,fner0

        set_fr_iimmed   0x8000,0x0000,fr1
        nfitos          fr1,fr1
        test_fr_iimmed  0xcf000000,fr1
        test_spr_immed  0,fner1
        test_spr_immed  0,fner0

        pass

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

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