X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86%2Fcall.lisp;h=67f5215deac67f6e4ff829652192051eba24ad1a;hb=f17811c866c0412da17d3ee94f11cf38783301f7;hp=8c62d1b0abe7690f17ce265d9fa7bc9576cc826b;hpb=68a83a65688bb578163c502e045da298d20a1f0c;p=sbcl.git

diff --git a/src/compiler/x86/call.lisp b/src/compiler/x86/call.lisp
index 8c62d1b..67f5215 100644
--- a/src/compiler/x86/call.lisp
+++ b/src/compiler/x86/call.lisp
@@ -33,7 +33,7 @@
   (declare (ignore standard))
   (make-wired-tn (primitive-type-or-lose 'system-area-pointer)
 		 sap-stack-sc-number return-pc-save-offset))
-;;; If standard is true, then use the standard (full call) location,
+;;; If STANDARD is true, then use the standard (full call) location,
 ;;; otherwise use any legal location.
 ;;;
 ;;; No problems.