2 * This software is part of the SBCL system. See the README file for
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.
19 /* Do anything we need to do when starting up the runtime environment
20 * on this architecture. */
21 extern void arch_init(void);
23 /* FIXME: It would be good to document these too! */
24 extern void arch_skip_instruction(os_context_t*);
25 extern boolean arch_pseudo_atomic_atomic(os_context_t*);
26 extern void arch_set_pseudo_atomic_interrupted(os_context_t*);
27 extern os_vm_address_t arch_get_bad_addr(int, siginfo_t*, os_context_t*);
28 extern unsigned char *arch_internal_error_arguments(os_context_t*);
29 extern unsigned long arch_install_breakpoint(void *pc);
30 extern void arch_remove_breakpoint(void *pc, unsigned long orig_inst);
31 extern void arch_install_interrupt_handlers(void);
32 extern void arch_do_displaced_inst(os_context_t *context,
33 unsigned int orig_inst);
35 extern int arch_os_thread_init(struct thread *thread);
36 extern int arch_os_thread_cleanup(struct thread *thread);
38 extern lispobj funcall0(lispobj function);
39 extern lispobj funcall1(lispobj function, lispobj arg0);
40 extern lispobj funcall2(lispobj function, lispobj arg0, lispobj arg1);
41 extern lispobj funcall3(lispobj function, lispobj arg0, lispobj arg1,
43 extern lispobj *component_ptr_from_pc(lispobj *pc);
45 #endif /* __ARCH_H__ */