From fc5b74538a85920db46e854b6b5666c12ead8b44 Mon Sep 17 00:00:00 2001
From: rtoy <rtoy>
Date: Mon, 7 Feb 2005 22:18:35 +0000
Subject: [PATCH] Symbols use the unused slot for a hash value now.

---
 lisp/print.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/print.c b/lisp/print.c
index 51de133c8..e7c122726 100644
--- a/lisp/print.c
+++ b/lisp/print.c
@@ -1,4 +1,4 @@
-/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/print.c,v 1.17 2005/02/07 22:10:07 rtoy Exp $ */
+/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/print.c,v 1.18 2005/02/07 22:18:35 rtoy Exp $ */
 
 #include <stdio.h>
 #include <string.h>
@@ -381,7 +381,7 @@ static void print_slots(char **slots, int count, lispobj *ptr)
             print_obj("???: ", *ptr++);
 }
 
-static char *symbol_slots[] = {"value: ", "unused: ",
+static char *symbol_slots[] = {"value: ", "hash: ",
     "plist: ", "name: ", "package: ", NULL};
 static char *ratio_slots[] = {"numer: ", "denom: ", NULL};
 static char *complex_slots[] = {"real: ", "imag: ", NULL};
-- 
GitLab