X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/7a32048d3bd7e76fd9163a381c8e210f7185fa45..refs/heads/master:/src/codegen-proto.lisp?ds=inline

diff --git a/src/codegen-proto.lisp b/src/codegen-proto.lisp
index 92569ae..0d0bc22 100644
--- a/src/codegen-proto.lisp
+++ b/src/codegen-proto.lisp
@@ -282,10 +282,6 @@ (defun format-banner-comment (stream control &rest args)
 
 ;; Important instruction classes.
 
-;; HACK: Some of the slot names we'd like to use are external symbols in our
-;; package or the `common-lisp' package.  Use gensyms for these slot names to
-;; prevent them from leaking.
-
 (definst var (stream :export t) (name %type &optional init)
   (pprint-logical-block (stream nil)
     (pprint-c-type type stream name)