diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-09-11 18:42:57 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-09-11 18:42:57 -0700 |
commit | 671363d734cb11628ce7c64169309feaecbfacea (patch) | |
tree | 89f87b3cece164e49736841c32d4df9ada97c76f /cadr.c | |
parent | 7b28c795b04bef5328b64fa50498d13d8a642e3b (diff) | |
download | txr-671363d734cb11628ce7c64169309feaecbfacea.tar.gz txr-671363d734cb11628ce7c64169309feaecbfacea.tar.bz2 txr-671363d734cb11628ce7c64169309feaecbfacea.zip |
Replace some rlet and slet uses with alet.
* share/txr/stdlib/place.tl (nthcdr): Fix a potentially
wrong order of evaluation by using a temporary symbol for the
list and using alet. If the list form could potentially
modify the index, then we now avoid a bug here.
(vecref, chr-str, ref, gethash, slot): Optimise
the expansion of these two-expression places using alet.
If both expressions are symbols, which is often the case,
temporaries are avoided.
Diffstat (limited to 'cadr.c')
0 files changed, 0 insertions, 0 deletions