diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2018-05-26 21:00:38 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2018-05-26 21:00:38 -0700 |
| commit | 6ad1aa9978b219f34799ae9db41e20452d06145f (patch) | |
| tree | 2ef3d5f73c2f7811fe5df8b1f228f014e093024f /args.c | |
| parent | 30b5b23616152d3603b1e1ff3158aba8c93eab48 (diff) | |
| download | txr-6ad1aa9978b219f34799ae9db41e20452d06145f.tar.gz txr-6ad1aa9978b219f34799ae9db41e20452d06145f.tar.bz2 txr-6ad1aa9978b219f34799ae9db41e20452d06145f.zip | |
compiler: fix broken block*.
Compiling a block* fails with an exception: nil is accessed
as a structure.
* share/txr/stdlib/compiler.tl (comp-block): when compiling
block*, nenv is nil; we must use env when compiling
the name subexpression. Also, we can't use nenv when compiling
the body. We must use nenv when it is available (block case)
or else fall back on env (block* case).
Diffstat (limited to 'args.c')
0 files changed, 0 insertions, 0 deletions