2 * This is the SPARC Linux incarnation of arch-dependent OS-dependent
3 * routines. See also "linux-os.c".
7 * This software is part of the SBCL system. See the README file for
10 * This software is derived from the CMU CL system, which was
11 * written at Carnegie Mellon University and released into the
12 * public domain. The software is in the public domain and is
13 * provided with absolutely no warranty. See the COPYING and CREDITS
14 * files for more information.
18 #include <sys/param.h>
24 #include "interrupt.h"
28 #include <sys/socket.h>
29 #include <sys/utsname.h>
31 #include <sys/types.h>
40 os_context_register_t
*
41 os_context_register_addr(os_context_t
*context
, int offset
)
47 } else if (offset
< 16) {
48 return &context
->uc_mcontext
.gregs
[offset
+3];
49 } else if (offset
< 32) {
50 /* FIXME: You know, this (int *) stuff looks decidedly
52 int *sp
= (int*) context
->uc_mcontext
.gregs
[REG_SP
];
53 return &(sp
[offset
-16]);
59 os_context_register_t
*
60 os_context_pc_addr(os_context_t
*context
)
62 return &(context
->uc_mcontext
.gregs
[REG_PC
]);
65 os_context_register_t
*
66 os_context_npc_addr(os_context_t
*context
)
68 return &(context
->uc_mcontext
.gregs
[REG_nPC
]);
72 os_context_sigmask_addr(os_context_t
*context
)
74 return &(context
->uc_sigmask
);
78 os_context_fp_control(os_context_t
*context
)
80 return (context
->uc_mcontext
.fpregs
.fpu_fsr
);
83 void os_flush_icache(os_vm_address_t address
, os_vm_size_t length
)
85 /* see sparc-assem.S */
86 sparc_flush_icache(address
, length
);