X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fvop.lisp;h=c6c650924d01ebc93fbd1bf64d628dc6fbf3d1f2;hb=c7dc5b2a1f56ed0583a0b3ea61b6ceb540c6f89e;hp=2c2e387b6047543c65ea3b48b2f206f7cd1ccf84;hpb=89f1990cfd886b8ea3706de9f5b9215fbe7310b6;p=sbcl.git

diff --git a/src/compiler/vop.lisp b/src/compiler/vop.lisp
index 2c2e387..c6c6509 100644
--- a/src/compiler/vop.lisp
+++ b/src/compiler/vop.lisp
@@ -242,6 +242,8 @@
   ;; CONSTANT-TNs are non-packed TNs that represent constants.
   ;; :CONSTANT TNs may eventually be converted to :CACHED-CONSTANT
   ;; normal TNs.
+  ;;
+  ;; FIXME: What is :CACHED-CONSTANT?
   (normal-tns nil :type (or tn null))
   (restricted-tns nil :type (or tn null))
   (wired-tns nil :type (or tn null))