X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fnode.lisp;h=44f0bfe4ef8a585d0592b3433c3c696a2ed35937;hb=94ac5b7c3ff37850210b6fc9a7593cf1c5752993;hp=df3ddb40f891c80940c47124a3cd9ab0945ddd74;hpb=34dd23563d2f5cf05c72b971da0d0b065a09bf2a;p=sbcl.git

diff --git a/src/compiler/node.lisp b/src/compiler/node.lisp
index df3ddb4..44f0bfe 100644
--- a/src/compiler/node.lisp
+++ b/src/compiler/node.lisp
@@ -1132,7 +1132,7 @@
 ;;; A REF represents a reference to a LEAF. REF-REOPTIMIZE is
 ;;; initially (and forever) NIL, since REFs don't receive any values
 ;;; and don't have any IR1 optimizer.
-(defstruct (ref (:include node (:reoptimize nil))
+(defstruct (ref (:include node (reoptimize nil))
 		(:constructor make-ref (derived-type leaf))
 		(:copier nil))
   ;; The leaf referenced.