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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [fsqrts.cgs] - Blame information for rev 840

Details | Compare with Previous | View Log


# frv testcase for fsqrts $FRj,$FRk
# mach: fr500 fr550 frv
 
        .include "testutils.inc"
 
        float_constants
        start
        load_float_constants
 
        .global fsqrts
fsqrts:
        fsqrts          fr44,fr1                ; 9.0
        test_fr_fr      fr1,fr36                ; 3.0
 
        set_fr_iimmed   0x4049,0x0fdb,fr10      ; 3.141592654
        fsqrts          fr10,fr10
        test_fr_iimmed  0x3fe2dfc5,fr10         ; 1.7724539
 
        pass

Line No.	Rev	Author	Line
1	24	jeremybenn	`# frv testcase for fsqrts $FRj,$FRk`
2			`# mach: fr500 fr550 frv`
3
4			`.include "testutils.inc"`
5
6			`float_constants`
7			`start`
8			`load_float_constants`
9
10			`.global fsqrts`
11			`fsqrts:`
12			`fsqrts fr44,fr1 ; 9.0`
13			`test_fr_fr fr1,fr36 ; 3.0`
14
15			`set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654`
16			`fsqrts fr10,fr10`
17			`test_fr_iimmed 0x3fe2dfc5,fr10 ; 1.7724539`
18
19			`pass`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [fsqrts.cgs] - Blame information for rev 840