X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Ftarget-disassem.lisp;h=b4572efb5c7fd4329ece3c98752436f5290ced95;hb=095564c28a259002c7e34fd1d861f5bbd0a959b6;hp=4ad36565fed9b814a7c8072e242fc8197d5c9019;hpb=75b52379bdc2269961af6a1308eca63610f38ac3;p=sbcl.git diff --git a/src/compiler/target-disassem.lisp b/src/compiler/target-disassem.lisp index 4ad3656..b4572ef 100644 --- a/src/compiler/target-disassem.lisp +++ b/src/compiler/target-disassem.lisp @@ -949,7 +949,7 @@ (file-position f char-offset)) (t (warn "Source file ~S has been modified; ~@ - using form offset instead of ~ + using form offset instead of ~ file index." name) (let ((*read-suppress* t)) @@ -995,7 +995,7 @@ nil) ((> form-number (length mapping-table)) (warn "bogus form-number in form! The source file has probably ~@ - been changed too much to cope with.") + been changed too much to cope with.") (when cache ;; Disable future warnings. (setf (sfcache-toplevel-form cache) nil))