diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-09-07 06:10:13 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-09-07 06:10:13 -0700 |
| commit | 703e6ec56c8cd1eb33b6572fde69c454587c0beb (patch) | |
| tree | a90cb70c71bbc85a50ac6a14ba5c2c0ddbcf7f8e /struct.c | |
| parent | 7409b670226a574119259a7a3d8597314954f12a (diff) | |
| download | txr-703e6ec56c8cd1eb33b6572fde69c454587c0beb.tar.gz txr-703e6ec56c8cd1eb33b6572fde69c454587c0beb.tar.bz2 txr-703e6ec56c8cd1eb33b6572fde69c454587c0beb.zip | |
Bugfix: x not macro-expanded in (set [x i] y).
* share/txr/stdlib/place.tl (sys:l1-setq): Expand sym, because
it might not be a symbol. If it isn't a symbol, just generate
a set.
(dwim): Unconditionally bind sys:*lisp1* to t, whether
or not the unexpanded place is a symbol. It could expand to
a symbol. The context is lisp-1 if it does that.
Diffstat (limited to 'struct.c')
0 files changed, 0 insertions, 0 deletions