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:

 	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;

             }

         }

     }