X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fbsd-os.h;h=63da20bc9c88d72ae4e69869d7f288ea24087eb7;hb=7f0f521aa3f6b45259c5dfd5f7f11adcd1a7cac6;hp=de568f869a81604f3c813f73173a56f2c5671c9d;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git diff --git a/src/runtime/bsd-os.h b/src/runtime/bsd-os.h index de568f8..63da20b 100644 --- a/src/runtime/bsd-os.h +++ b/src/runtime/bsd-os.h @@ -21,6 +21,7 @@ typedef caddr_t os_vm_address_t; typedef vm_size_t os_vm_size_t; typedef off_t os_vm_offset_t; typedef int os_vm_prot_t; +typedef int os_context_register_t; #if defined __FreeBSD__ /* Note: The man page for sigaction(2) in FreeBSD 4.0 says that this @@ -28,14 +29,20 @@ typedef int os_vm_prot_t; * original FreeBSD port of SBCL, that's wrong, it's actually a * ucontext_t. */ typedef ucontext_t os_context_t; +/* As the sbcl-devel message from Raymond Wiker 2000-12-01, FreeBSD + * (unlike Linux and OpenBSD) doesn't let us tweak the CPU's single + * step flag bit by messing with the flags stored in a signal context, + * so we need to implement single stepping in a more roundabout way. */ +#define CANNOT_GET_TO_SINGLE_STEP_FLAG #elif defined __OpenBSD__ typedef struct sigcontext os_context_t; #else #error unsupported BSD variant #endif +#include "target-arch-os.h" +#include "target-arch.h" + #define OS_VM_PROT_READ PROT_READ #define OS_VM_PROT_WRITE PROT_WRITE #define OS_VM_PROT_EXECUTE PROT_EXEC - -#define OS_VM_DEFAULT_PAGESIZE 4096