Raymond Toy pushed to branch issue-243-weak-pointer-to-static-array at cmucl / cmucl
Commits:
-
9cb44e30
by Raymond Toy at 2024-02-17T19:59:54-08:00
1 changed file:
Changes:
| ... | ... | @@ -5570,16 +5570,12 @@ scan_weak_pointers(void) |
| 5570 | 5570 | {
|
| 5571 | 5571 | struct weak_pointer *wp;
|
| 5572 | 5572 | |
| 5573 | - /*
|
|
| 5574 | - * Now process the weak pointers.
|
|
| 5575 | - */
|
|
| 5576 | - |
|
| 5577 | 5573 | for (wp = weak_pointers; wp; wp = wp->next) {
|
| 5578 | 5574 | lispobj value = wp->value;
|
| 5579 | 5575 | lispobj *first_pointer = (lispobj *) PTR(value);
|
| 5580 | 5576 | |
| 5581 | 5577 | wp->mark_bit = NIL;
|
| 5582 | - if (Pointerp(value) & from_space_p(value)) {
|
|
| 5578 | + if (Pointerp(value) && from_space_p(value)) {
|
|
| 5583 | 5579 | if (first_pointer[0] == 0x01)
|
| 5584 | 5580 | wp->value = first_pointer[1];
|
| 5585 | 5581 | else {
|