X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcross-misc.lisp;h=18f7fbb258fe1a7ca2202530a00d61918a9b6935;hb=a37de74b393a808825585000bb5b2b92218d46c0;hp=c44584adb989e4d95aa4583b4ca7d4baf6611bc7;hpb=a40c4adfd7837230109cdb1f054b44fe0b15371a;p=sbcl.git

diff --git a/src/code/cross-misc.lisp b/src/code/cross-misc.lisp
index c44584a..18f7fbb 100644
--- a/src/code/cross-misc.lisp
+++ b/src/code/cross-misc.lisp
@@ -73,7 +73,7 @@
   (and (typep x 'simple-array)
        (= 1 (array-rank x))))
 
-;;; Genesis needs these at cross-compile time. The target
+;;; GENESIS needs these at cross-compile time. The target
 ;;; implementation of these is reasonably efficient by virtue of its
 ;;; ability to peek into the internals of the package implementation;
 ;;; this reimplementation is portable but slow.