0.8.21.1:
[sbcl.git] / src / runtime / arch.h
1 /*
2  * This software is part of the SBCL system. See the README file for
3  * more information.
4  *
5  * This software is derived from the CMU CL system, which was
6  * written at Carnegie Mellon University and released into the
7  * public domain. The software is in the public domain and is
8  * provided with absolutely no warranty. See the COPYING and CREDITS
9  * files for more information.
10  */
11
12 #ifndef __ARCH_H__
13 #define __ARCH_H__
14
15 #include "os.h"
16 #include "signal.h"
17
18 /* Do anything we need to do when starting up the runtime environment
19  * on this architecture. */
20 extern void arch_init(void);
21
22 /* FIXME: It would be good to document these too! */
23 extern void arch_skip_instruction(os_context_t*);
24 extern boolean arch_pseudo_atomic_atomic(os_context_t*);
25 extern void arch_set_pseudo_atomic_interrupted(os_context_t*);
26 extern os_vm_address_t arch_get_bad_addr(int, siginfo_t*, os_context_t*);
27 extern unsigned char *arch_internal_error_arguments(os_context_t*);
28 extern unsigned long arch_install_breakpoint(void *pc);
29 extern void arch_remove_breakpoint(void *pc, unsigned long orig_inst);
30 extern void arch_install_interrupt_handlers(void);
31 extern void arch_do_displaced_inst(os_context_t *context,
32                                    unsigned int orig_inst);
33 extern lispobj funcall0(lispobj function);
34 extern lispobj funcall1(lispobj function, lispobj arg0);
35 extern lispobj funcall2(lispobj function, lispobj arg0, lispobj arg1);
36 extern lispobj funcall3(lispobj function, lispobj arg0, lispobj arg1,
37                         lispobj arg2);
38 extern lispobj *component_ptr_from_pc(lispobj *pc);
39
40 #endif /* __ARCH_H__ */