projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.45.33: optimize CHARPOS on string-streams
[sbcl.git]
/
src
/
code
/
load.lisp
diff --git
a/src/code/load.lisp
b/src/code/load.lisp
index
97258b3
..
3b2a82f
100644
(file)
--- a/
src/code/load.lisp
+++ b/
src/code/load.lisp
@@
-456,6
+456,8
@@
;; that this would go away?
(fill *current-fop-table* nil))))
t)
;; that this would go away?
(fill *current-fop-table* nil))))
t)
+
+(declaim (notinline read-byte)) ; Why is it even *declaimed* inline above?
\f
;;;; stuff for debugging/tuning by collecting statistics on FOPs (?)
\f
;;;; stuff for debugging/tuning by collecting statistics on FOPs (?)