123456789101112131415161718192021222324252627282930313233343536373839404142 |
- /* This code is a little awkward. If somebody who understands Solaris
- better would tell me an idiomatic way to invoke equivalent
- behavior, I'd be grateful. ehg@bell-labs.com */
- #include "lib9.h"
- ulong
- getfcr(void)
- {
- ulong v;
- asm(" st %fsr, [%fp-8]");
- return v;
- }
- void
- setfcr(ulong v)
- {
- ulong vv;
- vv = (getfcr() & ~FPFCR) | (v & FPFCR);
- asm(" ld [%fp-4], %fsr");
- }
- ulong
- getfsr(void)
- {
- ulong v;
- asm(" st %fsr, [%fp-8]");
- return v;
- }
- void
- setfsr(ulong v)
- {
- ulong vv;
- vv = (getfsr() & ~FPFSR) | (v & FPFSR);
- asm(" ld [%fp-4], %fsr");
- }
|