projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.9.10:
[sbcl.git]
/
src
/
compiler
/
target-disassem.lisp
diff --git
a/src/compiler/target-disassem.lisp
b/src/compiler/target-disassem.lisp
index
4b73b0b
..
6e07407
100644
(file)
--- a/
src/compiler/target-disassem.lisp
+++ b/
src/compiler/target-disassem.lisp
@@
-381,8
+381,7
@@
(1- lra-size))))
sb!vm:return-pc-header-widetag))
(unless (null stream)
(1- lra-size))))
sb!vm:return-pc-header-widetag))
(unless (null stream)
- (princ '.lra stream))
- (incf (dstate-next-offs dstate) lra-size))
+ (note "possible LRA header" dstate)))
nil)
;;; Print the fun-header (entry-point) pseudo-instruction at the
nil)
;;; Print the fun-header (entry-point) pseudo-instruction at the