commit 255f3ead060129aa097b62f10d054cdc4997a431
Author: Douglas Katzman <dougk@google.com>
Date:   Mon Jan 1 23:59:50 2024 -0500

    Fix ppc64 failure-to-build (from a few weeks ago)
    
    Git rev 7354472bb5 caused NIL to get a bogus widetag.

diff --git a/make-target-2-load.lisp b/make-target-2-load.lisp
index 6571ec27d..daef942ea 100644
--- a/make-target-2-load.lisp
+++ b/make-target-2-load.lisp
@@ -339,7 +339,13 @@ Please check that all strings which were not recognizable to the compiler
 
 
   (do-all-symbols (symbol)
-    (sb-kernel:logior-header-bits symbol sb-vm::+symbol-initial-core+)
+    ;; Don't futz with the header of static symbols.
+    ;; Technically LOGIOR-HEADER-BITS can only be used on an OTHER-POINTER-LOWTAG
+    ;; objects, so modifying NIL should not ever work, but it's especially wrong
+    ;; on ppc64 where OTHER- and LIST- pointer lowtags are 10 bytes apart instead
+    ;; of 8, so this was making a random alteration to the header.
+    (unless (eq (heap-allocated-p symbol) :static)
+      (sb-kernel:logior-header-bits symbol sb-vm::+symbol-initial-core+))
 
     ;; A symbol whose INFO slot underwent any kind of manipulation
     ;; such that it now has neither properties nor globaldb info,
guix/tree/gnu/packages/rsync.scm?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>tree</a><a href='/guix/commit/gnu/packages/rsync.scm?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>commit</a><a href='/guix/diff/gnu/packages/rsync.scm?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/rsync.scm'>
<input type='hidden' name='id' value='f22c20e7ca14f79f0be5ce228f55d934cda27e04'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>root</a>/<a href='/guix/log/gnu?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>gnu</a>/<a href='/guix/log/gnu/packages?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>packages</a>/<a href='/guix/log/gnu/packages/rsync.scm?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04'>rsync.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/rsync.scm?id=f22c20e7ca14f79f0be5ce228f55d934cda27e04&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-02-19 01:00:01 +0100'>2023-02-19</span></td><td><a href='/guix/commit/gnu/packages/rsync.scm?id=1e6ddceb8318d413745ca1c9d91fde01b1e0364b'>gnu: Use HTTPS package home pages wherever possible.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>