Raymond Toy pushed to branch issue-243-weak-pointer-to-static-array at cmucl / cmucl

Commits: f45625b4 by Raymond Toy at 2024-02-17T19:54:26-08:00 Minor tweak to minimize diff from master

Combine two if statements like it was on master to minimize the diff between this version and master because it's a needless change.

- - - - -

1 changed file:

- src/lisp/gencgc.c

Changes:

===================================== src/lisp/gencgc.c ===================================== @@ -5579,14 +5579,12 @@ scan_weak_pointers(void) lispobj *first_pointer = (lispobj *) PTR(value);

wp->mark_bit = NIL; - if (Pointerp(value)) { - if (from_space_p(value)) { - if (first_pointer[0] == 0x01) - wp->value = first_pointer[1]; - else { - wp->value = NIL; - wp->broken = T; - } + if (Pointerp(value) & from_space_p(value)) { + if (first_pointer[0] == 0x01) + wp->value = first_pointer[1]; + else { + wp->value = NIL; + wp->broken = T; } } }

View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/f45625b4992eada575b56ddb...