projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.16.26:
[sbcl.git]
/
src
/
compiler
/
target-disassem.lisp
diff --git
a/src/compiler/target-disassem.lisp
b/src/compiler/target-disassem.lisp
index
4ad3656
..
b4572ef
100644
(file)
--- 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; ~@
(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))
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 ~@
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))
(when cache
;; Disable future warnings.
(setf (sfcache-toplevel-form cache) nil))