Parent Directory | Revision Log | Patch
revision 1.12.6.1 by camm, Sun Apr 4 19:29:08 2004 UTC | revision 1.12.6.1.12.1 by camm, Sat Jan 15 16:28:16 2005 UTC | |
---|---|---|
# | Line 41 | Line 41 |
41 | ||
42 | #define I386 | #define I386 |
43 | #define SGC | #define SGC |
44 | ||
45 | ||
46 | #ifdef IN_SFASL | |
47 | #include <sys/mman.h> | |
48 | #define CLEAR_CACHE {\ | |
49 | void *p,*pe; \ | |
50 | p=(void *)((unsigned long)memory->cfd.cfd_start & ~(PAGESIZE-1)); \ | |
51 | pe=(void *)((unsigned long)(memory->cfd.cfd_start+memory->cfd.cfd_size) & ~(PAGESIZE-1)) + PAGESIZE-1; \ | |
52 | if (mprotect(p,pe-p,PROT_READ|PROT_WRITE|PROT_EXEC)) {\ | |
53 | fprintf(stderr,"%p %p\n",p,pe);\ | |
54 | perror("");\ | |
55 | FEerror("Cannot mprotect", 0);\ | |
56 | }\ | |
57 | } | |
58 | #endif |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |