From c51744b25247f8178af7b2ea281bf5bbb3e77343 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Thu, 31 May 1990 00:27:47 +0000
Subject: [PATCH] Have makunbound return the symbol (instead of the unbound
 marker).

---
 code/symbol.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/code/symbol.lisp b/code/symbol.lisp
index 455006f44..5a8b075a3 100644
--- a/code/symbol.lisp
+++ b/code/symbol.lisp
@@ -32,7 +32,8 @@
   (set variable
        (%primitive make-other-immediate-type
 		   0
-		   vm:unbound-marker-type)))
+		   vm:unbound-marker-type))
+  variable)
 
 (defun symbol-value (variable)
   "VARIABLE must evaluate to a symbol.  This symbol's current special
-- 
GitLab