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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libc/] [sys/] [sysvnecv70/] [fps.S] - Blame information for rev 816

Details | Compare with Previous | View Log


        .globl  _fpgetsticky
_fpgetsticky:
        getpsw    r0
        and.w     #0x1f00,r0
        shl.w     #0xf8,r0
        ret       #0x0
 
 
        .globl  _fpsetsticky
_fpsetsticky:
         getpsw   r0
         mov.w    [ap],r1
         shl.w    #0x8,r1
         updpsw.h r1,#0x1f00
         trapfl
         and.w    #0x1f00,r0
         shl.w    #0xf8,r0
         ret      #0x0

Line No.	Rev	Author	Line
1	148	jeremybenn	`.globl _fpgetsticky`
2			`_fpgetsticky:`
3			`getpsw r0`
4			`and.w #0x1f00,r0`
5			`shl.w #0xf8,r0`
6			`ret #0x0`
7
8
9			`.globl _fpsetsticky`
10			`_fpsetsticky:`
11			`getpsw r0`
12			`mov.w [ap],r1`
13			`shl.w #0x8,r1`
14			`updpsw.h r1,#0x1f00`
15			`trapfl`
16			`and.w #0x1f00,r0`
17			`shl.w #0xf8,r0`
18			`ret #0x0`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libc/] [sys/] [sysvnecv70/] [fps.S] - Blame information for rev 816