From: Paul K. <pk...@us...> - 2010-04-26 21:43:07
|
Update of /cvsroot/sbcl/sbcl/src/code In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv30498/src/code Modified Files: load.lisp Log Message: 1.0.37.67: Reset a toplevel INLINE declaration for READ-BYTE * It used to remain declaimed inline after load.lisp. Report and patch by Stas Boukarev. Index: load.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/code/load.lisp,v retrieving revision 1.46 retrieving revision 1.47 diff -u -d -r1.46 -r1.47 --- load.lisp 16 Sep 2009 11:46:40 -0000 1.46 +++ load.lisp 26 Apr 2010 21:42:58 -0000 1.47 @@ -456,6 +456,8 @@ ;; that this would go away? (fill *current-fop-table* nil)))) t) + +(declaim (notinline read-byte)) ; Why is it even *declaimed* inline above? ;;;; stuff for debugging/tuning by collecting statistics on FOPs (?) |