sys/src/libc/sparc/getfcr.s

   1 TEXT    getfsr(SB), $0
   2         SUB     $4, R1
   3         MOVW    FSR, (R1)
   4         MOVW    (R1), R7
   5         ADD     $4, R1
   6         RETURN
   7
   8 TEXT    setfsr(SB), $0
   9         SUB     $4, R1
  10         MOVW    R7, (R1)
  11         MOVW    (R1), FSR
  12         ADD     $4, R1
  13         RETURN
  14
  15 TEXT    setfcr(SB), $0
  16         SUB     $4, R1
  17         MOVW    R7, (R1)
  18         MOVW    (R1), FSR
  19         ADD     $4, R1
  20         RETURN
  21
  22 TEXT    getfcr(SB), $0
  23         SUB     $4, R1
  24         MOVW    FSR, (R1)
  25         MOVW    (R1), R7
  26         ADD     $4, R1
  27         RETURN