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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [frv/] [cmmulhs.cgs] - Rev 834

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

# frv testcase for cmmulhs $GRi,$GRj,$ACCk,$CCi,$cond
# mach: all

        .include "testutils.inc"

        start

        .global cmmulhs
cmmulhs:
        set_spr_immed   0x1b1b,cccr

        ; Positive operands
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_immed  6,acc0
        test_accg_immed         0,accg1
        test_acc_immed  6,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_immed  0,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_immed  2,acc0
        test_accg_immed         0,accg1
        test_acc_immed  2,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_limmed 0,0x7ffe,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0,0x7ffe,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_limmed 0x0000,0x8000,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0x0000,0x8000,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0,accg0
        test_acc_limmed 0x3fff,0x0001,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0x3fff,0x0001,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0xff,accg0
        test_acc_immed  -6,acc0
        test_accg_immed         0xff,accg1
        test_acc_immed  -6,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc0,1
        test_accg_immed         0xff,accg0
        test_acc_immed  -2,acc0
        test_accg_immed         0xff,accg1
        test_acc_immed  -2,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0,accg0
        test_acc_immed  0,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xffff,0xbffe,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xffff,0xbffe,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xffff,0x8000,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xffff,0x8000,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xc000,0x8000,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xc000,0x8000,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0,accg0
        test_acc_immed  6,acc0
        test_accg_immed         0,accg1
        test_acc_immed  6,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0,accg0
        test_acc_immed  2,acc0
        test_accg_immed         0,accg1
        test_acc_immed  2,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0,accg0
        test_acc_immed  0x3fff0001,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0x3fff0001,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc4,1
        test_accg_immed         0,accg0
        test_acc_immed  0x40000000,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0x40000000,acc1

        ; Positive operands
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_immed  6,acc0
        test_accg_immed         0,accg1
        test_acc_immed  6,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_immed  0,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_immed  2,acc0
        test_accg_immed         0,accg1
        test_acc_immed  2,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_limmed 0,0x7ffe,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0,0x7ffe,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_limmed 0x0000,0x8000,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0x0000,0x8000,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0,accg0
        test_acc_limmed 0x3fff,0x0001,acc0
        test_accg_immed         0,accg1
        test_acc_limmed 0x3fff,0x0001,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0xff,accg0
        test_acc_immed  -6,acc0
        test_accg_immed         0xff,accg1
        test_acc_immed  -6,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc1,0
        test_accg_immed         0xff,accg0
        test_acc_immed  -2,acc0
        test_accg_immed         0xff,accg1
        test_acc_immed  -2,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0,accg0
        test_acc_immed  0,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xffff,0xbffe,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xffff,0xbffe,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xffff,0x8000,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xffff,0x8000,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0xff,accg0
        test_acc_limmed 0xc000,0x8000,acc0
        test_accg_immed         0xff,accg1
        test_acc_limmed 0xc000,0x8000,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0,accg0
        test_acc_immed  6,acc0
        test_accg_immed         0,accg1
        test_acc_immed  6,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0,accg0
        test_acc_immed  2,acc0
        test_accg_immed         0,accg1
        test_acc_immed  2,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0,accg0
        test_acc_immed  0x3fff0001,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0x3fff0001,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc5,0
        test_accg_immed         0,accg0
        test_acc_immed  0x40000000,acc0
        test_accg_immed         0,accg1
        test_acc_immed  0x40000000,acc1

        ; Positive operands
        set_accg_immed  0x00000011,accg0
        set_acc_immed   0x11111111,acc0
        set_accg_immed  0x00000022,accg1
        set_acc_immed   0x22222222,acc1
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc0,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc4,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Positive operands
        set_accg_immed  0x00000011,accg0
        set_acc_immed   0x11111111,acc0
        set_accg_immed  0x00000022,accg1
        set_acc_immed   0x22222222,acc1
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc1,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc5,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Positive operands
        set_accg_immed  0x00000011,accg0
        set_acc_immed   0x11111111,acc0
        set_accg_immed  0x00000022,accg1
        set_acc_immed   0x22222222,acc1
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc2,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc2,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc2,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc2,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc2,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc2,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc2,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc2,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc6,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc6,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc6,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc6,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc6,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc6,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc6,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc6,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Positive operands
        set_accg_immed  0x00000011,accg0
        set_acc_immed   0x11111111,acc0
        set_accg_immed  0x00000022,accg1
        set_acc_immed   0x22222222,acc1
        set_fr_iimmed   2,3,fr7         ; multiply small numbers
        set_fr_iimmed   3,2,fr8
        cmmulhs         fr7,fr8,acc0,cc3,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0,1,fr7         ; multiply by 0
        set_fr_iimmed   2,0,fr8
        cmmulhs         fr7,fr8,acc0,cc3,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   2,1,fr7         ; multiply by 1
        set_fr_iimmed   1,2,fr8
        cmmulhs         fr7,fr8,acc0,cc3,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x3fff,2,fr7    ; 15 bit result
        set_fr_iimmed   2,0x3fff,fr8
        cmmulhs         fr7,fr8,acc0,cc3,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,2,fr7    ; 16 bit result
        set_fr_iimmed   2,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc3,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x7fff,fr7       ; max positive result
        set_fr_iimmed   0x7fff,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc3,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Mixed operands
        set_fr_iimmed   2,0xfffd,fr7            ; multiply small numbers
        set_fr_iimmed   0xfffd,2,fr8
        cmmulhs         fr7,fr8,acc0,cc3,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,1,fr7            ; multiply by 1
        set_fr_iimmed   1,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc3,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xfffe,0,fr7            ; multiply by 0
        set_fr_iimmed   0,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc7,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x2001,0xfffe,fr7       ; 15 bit result
        set_fr_iimmed   0xfffe,0x2001,fr8
        cmmulhs         fr7,fr8,acc0,cc7,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x4000,0xfffe,fr7       ; 16 bit result
        set_fr_iimmed   0xfffe,0x4000,fr8
        cmmulhs         fr7,fr8,acc0,cc7,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x7fff,0x8000,fr7       ; max negative result
        set_fr_iimmed   0x8000,0x7fff,fr8
        cmmulhs         fr7,fr8,acc0,cc7,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        ; Negative operands
        set_fr_iimmed   0xfffe,0xfffd,fr7               ; multiply small numbers
        set_fr_iimmed   0xfffd,0xfffe,fr8
        cmmulhs         fr7,fr8,acc0,cc7,1
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0xffff,0xfffe,fr7               ; multiply by -1
        set_fr_iimmed   0xfffe,0xffff,fr8
        cmmulhs         fr7,fr8,acc0,cc7,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8001,0x8001,fr7       ; almost max positive result
        set_fr_iimmed   0x8001,0x8001,fr8
        cmmulhs         fr7,fr8,acc0,cc7,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        set_fr_iimmed   0x8000,0x8000,fr7       ; max positive result
        set_fr_iimmed   0x8000,0x8000,fr8
        cmmulhs         fr7,fr8,acc0,cc7,0
        test_accg_immed         0x00000011,accg0
        test_acc_immed  0x11111111,acc0
        test_accg_immed         0x00000022,accg1
        test_acc_immed  0x22222222,acc1

        pass

Go to most recent revision | 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.