diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2018-03-25 08:02:40 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2018-03-25 08:02:40 -0700 |
| commit | 23a7e6356156fe16686b7f5e372e9379776645f8 (patch) | |
| tree | c782cbbcf0c52f3902551c96cca405a18678117f /LICENSE-CYG | |
| parent | 4ddec63afdb50cc252bb4396d6cdc0d866c2adfc (diff) | |
| download | txr-23a7e6356156fe16686b7f5e372e9379776645f8.tar.gz txr-23a7e6356156fe16686b7f5e372e9379776645f8.tar.bz2 txr-23a7e6356156fe16686b7f5e372e9379776645f8.zip | |
compiler: setq bug: wrong return for globals.
* share/txr/stdlib/compiler.tl (compiler comp-setq): The
output register of the returned frag must be that of the value
calculating frag, not vloc, because in the dynamic variable
case, vloc holds the d-reg with the variable's name, not the
v-reg that receives its value.
(compiler compl-lisp1-setq): Fix same bug which got propagated
by copy-and-paste coding.
Diffstat (limited to 'LICENSE-CYG')
0 files changed, 0 insertions, 0 deletions