Newer
Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
/*
$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/FreeBSD-os.h,v 1.1 1997/01/21 00:28:13 ram Exp $
This code was written as part of the CMU Common Lisp project at
Carnegie Mellon University, and has been placed in the public domain.
*/
#include <sys/types.h>
#include <sys/mman.h>
#include <sys/signal.h>
#define MAP_ANONYMOUS MAP_ANON
#define MAP_VARIABLE 0
#define PRINTNOISE
#undef PRINTNOISE
/* #define DEBUG_SCAVENGE_VERBOSE */
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;
#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
int
sc_reg(struct sigcontext*,int);
void
os_save_context();
#define SAVE_CONTEXT os_save_context
#define USE_SIG_STACK
/*
* On second thought, a separate stack would probably
* confuse the hell out of the Lisp debugger!
*/
#undef USE_SIG_STACK