From a948221d325e52196d4dddcd0649dfa19cb76e2a Mon Sep 17 00:00:00 2001
From: dtc <dtc>
Date: Sat, 8 Feb 1997 21:15:38 +0000
Subject: [PATCH] Removed unnecessary comment.

---
 compiler/x86/alloc.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/x86/alloc.lisp b/compiler/x86/alloc.lisp
index 0f8729efc..5d5601fbb 100644
--- a/compiler/x86/alloc.lisp
+++ b/compiler/x86/alloc.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
- "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/x86/alloc.lisp,v 1.1 1997/01/18 14:31:20 ram Exp $")
+ "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/x86/alloc.lisp,v 1.2 1997/02/08 21:15:38 dtc Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -232,7 +232,7 @@
     (with-cgc-allocation(temp (pad-data-block words))
       (inst lea result (make-ea :byte :base temp :disp lowtag)))
 
-    (when type				; dunno what this does yet
+    (when type
       (inst mov temp (logior (ash (1- words) type-bits) type))
       (storew temp result 0 lowtag))))
 
-- 
GitLab