Disable open-coding accessors when space constraint is large

This commit is contained in:
Juan Jose Garcia Ripoll 2011-04-03 21:45:44 +02:00
parent bcd542c343
commit 7f26ef678d

View file

@ -276,7 +276,7 @@
(define-policy inline-slot-access :on speed 1 :off debug 2 :off safety 2
"Inline access to structures and sealed classes")
(define-policy inline-accessors :off debug 2
(define-policy inline-accessors :off debug 2 :off space 2
"Inline access to object slots, including conses and arrays")
(define-policy open-code-aref/aset :alias inline-accessors