| commit | b98e590a667631cbbb28797664c3dc2d30fc9426 | |
| author | Christophe Rhodes <csr21@cantab.net> | |
| Mon, 11 Jan 2016 12:20:11 +0000 (11 12:20 +0000) | ||
| committer | Christophe Rhodes <csr21@cantab.net> | |
| Mon, 11 Jan 2016 12:31:29 +0000 (11 12:31 +0000) | ||
| tree | f9970e3c0eba7cf4d066b752151933ad1233389e | treesnapshot (tar.gz zip) |
| parent | cd4e48eac19f2e401f707a404b0e0582a130e135 | commitdiff |
inline and localize auxiliary functions
inline %save-displaced-array-backpointer, so that the fast path can be
taken without making a full function call.
%walk-displaced-array-backpointers is only used from set-array-header,
so make it a local function, again so that we don't have to make full
function calls. This improves adjusting the displacement on adjustable
arrays substantially.
inline %save-displaced-array-backpointer, so that the fast path can be
taken without making a full function call.
%walk-displaced-array-backpointers is only used from set-array-header,
so make it a local function, again so that we don't have to make full
function calls. This improves adjusting the displacement on adjustable
arrays substantially.
| src/code/array.lisp | diffblobblamehistory |