X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Frepresent.lisp;h=7c24005bbc0fa39d2d595b04ea60b6d2c1bd9978;hb=e63e3a55357c0de5220b62097b5ad17efaea6021;hp=8d2418e1ad0ce650a17d0f900059edcc924dff69;hpb=e6a7faf7fe4193f61eeaf1151f891c38b7c8e6ed;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