X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Frepresent.lisp;h=7c24005bbc0fa39d2d595b04ea60b6d2c1bd9978;hb=0e3c4b4db102bd204a30402d7e5a0de44aea57ce;hp=8d2418e1ad0ce650a17d0f900059edcc924dff69;hpb=d604a358d8e5eb5587989e0a4f1d31dbe6ac5ffe;p=sbcl.git

diff --git a/src/compiler/represent.lisp b/src/compiler/represent.lisp
index 8d2418e..7c24005 100644
--- a/src/compiler/represent.lisp
+++ b/src/compiler/represent.lisp
@@ -417,7 +417,7 @@
                     :t-ok nil))
           (return info))))))
 
-;;; Emit a coercion VOP for OP BEFORE the specifed VOP or die trying.
+;;; Emit a coercion VOP for OP BEFORE the specified VOP or die trying.
 ;;; SCS is the operand's LOAD-SCS vector, which we use to determine
 ;;; what SCs the VOP will accept. We pick any acceptable coerce VOP,
 ;;; since it practice it seems uninteresting to have more than one