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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libc/] [sys/] [sysvnecv70/] [fps.S] - Blame information for rev 207

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 207 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

powered by: WebSVN 2.1.0

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