X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fnode.lisp;h=7d1cc76d070b4bf3ace92621b458ffcfb3ad1df8;hb=a2fcf3abd6d0b90f9de0f016ac5c9c65270294b2;hp=3423c37c975220a3cdf8145bb9836f83fa6530a4;hpb=ec735ab75335c1744b39190314142a7e6f1ecdb3;p=sbcl.git

diff --git a/src/compiler/node.lisp b/src/compiler/node.lisp
index 3423c37..7d1cc76 100644
--- a/src/compiler/node.lisp
+++ b/src/compiler/node.lisp
@@ -37,7 +37,7 @@
   ;;	until it is assigned a block, and may be also be temporarily
   ;;	unused during later manipulations of IR1. In a consistent
   ;;	state there should never be any mention of :UNUSED
-  ;;	continuations. Next can have a non-null value if the next node
+  ;;	continuations. NEXT can have a non-null value if the next node
   ;;	has already been determined.
   ;;
   ;; :DELETED
@@ -87,7 +87,7 @@
   ;; the node where this continuation is used, if unique. This is always
   ;; null in :DELETED and :UNUSED continuations, and is never null in
   ;; :INSIDE-BLOCK continuations. In a :BLOCK-START continuation, the
-  ;; Block's START-USES indicate whether NIL means no uses or more
+  ;; BLOCK's START-USES indicate whether NIL means no uses or more
   ;; than one use.
   (use nil :type (or node null))
   ;; the basic block this continuation is in. This is null only in