Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
-
51f730c2
by Raymond Toy at 2021-01-02T14:11:17-08:00
-
c60c50da
by Raymond Toy at 2021-01-02T22:35:29+00:00
2 changed files:
Changes:
... | ... | @@ -495,7 +495,6 @@ gc_write_barrier(void *addr) |
495 | 495 |
/* Un-protect the page */
|
496 | 496 |
os_protect((os_vm_address_t) page_address(page_index), GC_PAGE_SIZE, OS_VM_PROT_ALL);
|
497 | 497 |
page_table[page_index].flags &= ~PAGE_WRITE_PROTECTED_MASK;
|
498 |
- page_table[page_index].flags |= PAGE_WRITE_PROTECT_CLEARED_MASK;
|
|
499 | 498 |
|
500 | 499 |
return 1;
|
501 | 500 |
}
|
... | ... | @@ -45,16 +45,6 @@ int gc_write_barrier(void *); |
45 | 45 |
#define PAGE_WRITE_PROTECTED(page) \
|
46 | 46 |
(page_table[page].flags & PAGE_WRITE_PROTECTED_MASK)
|
47 | 47 |
|
48 |
-/*
|
|
49 |
- * This flag is set when the above write protect flag is clear by the
|
|
50 |
- * sigbus handler. This is useful for re-scavenging pages that are
|
|
51 |
- * written during a GC.
|
|
52 |
- */
|
|
53 |
- |
|
54 |
-#define PAGE_WRITE_PROTECT_CLEARED_MASK 0x00000020
|
|
55 |
-#define PAGE_WRITE_PROTECT_CLEARED(page) \
|
|
56 |
- (page_table[page].flags & PAGE_WRITE_PROTECT_CLEARED_MASK)
|
|
57 |
- |
|
58 | 48 |
/*
|
59 | 49 |
* Page allocated flag: 0 for a free page; 1 when allocated. If
|
60 | 50 |
* the page is free then the following slots are invalid - well
|