| commit | 284c8f6833589a6bddf22a5af30d3ac4eafcd2cc | |
| author | Nikodemus Siivola <nikodemus@random-state.net> | |
| Mon, 13 Aug 2007 13:55:15 +0000 (13 13:55 +0000) | ||
| committer | Nikodemus Siivola <nikodemus@random-state.net> | |
| Mon, 13 Aug 2007 13:55:15 +0000 (13 13:55 +0000) | ||
| tree | 027f249a9c495ea8513a21bf2ab893828a158f23 | treesnapshot (tar.gz zip) |
| parent | 25016a777703dc022ef527cbe6a5f3ca6903bc61 | commitdiff |
1.0.8.25: refactor CAN-OPTIMIZE-ACCESS usage and interface
* Make the constant slot-name and the possible new-value-form
additional return values.
* Use CONSTANT-FORM-VALUE instead of EVAL to get the constant
slot-name. Also use the environment correctly to CONSTANTP
and CONSTANT-FORM-VALUE.
* Call CAN-OPTIMIZE-ACCESS in the various instance-access optimizers
and not around calls to them, so that they can directly use the
slot-name and new-value-form results from CAN-OPTIMIZE-ACCESS
instead of having to recompute them.
* Make the constant slot-name and the possible new-value-form
additional return values.
* Use CONSTANT-FORM-VALUE instead of EVAL to get the constant
slot-name. Also use the environment correctly to CONSTANTP
and CONSTANT-FORM-VALUE.
* Call CAN-OPTIMIZE-ACCESS in the various instance-access optimizers
and not around calls to them, so that they can directly use the
slot-name and new-value-form results from CAN-OPTIMIZE-ACCESS
instead of having to recompute them.
| src/pcl/boot.lisp | diffblobblamehistory | |
| src/pcl/vector.lisp | diffblobblamehistory | |
| version.lisp-expr | diffblobblamehistory |