summaryrefslogtreecommitdiffstats
path: root/lisplib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2020-12-29 16:28:54 -0800
committerKaz Kylheku <kaz@kylheku.com>2020-12-29 16:28:54 -0800
commitaf42ca5ed14d62bed6fa86c92455678d5996d81a (patch)
tree75de55875d2678127baf131e0576ee3ec63824c7 /lisplib.c
parent1eb0fadc0bad58b3d72bcc5453d45c6089abea36 (diff)
downloadtxr-af42ca5ed14d62bed6fa86c92455678d5996d81a.tar.gz
txr-af42ca5ed14d62bed6fa86c92455678d5996d81a.tar.bz2
txr-af42ca5ed14d62bed6fa86c92455678d5996d81a.zip
awk: bugfix: fconv symbols not in usr package.
* share/txr/stdlib/conv.tl (sys:conv-let): Use usr: package prefix on the conversion symbols i, o, x, b. They are being interned in the system package, which breaks the awk fconv macro.
Diffstat (limited to 'lisplib.c')
-rw-r--r--lisplib.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisplib.c b/lisplib.c
index b4d6d4c3..6319f040 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -409,7 +409,10 @@ static val awk_set_entries(val dlt, val fun)
lit("next-file"), lit("rng"), lit("-rng"), lit("rng-"), lit("-rng-"),
lit("--rng"), lit("--rng-"), lit("rng+"), lit("-rng+"), lit("--rng+"),
lit("ff"), lit("f"), lit("mf"), lit("fconv"), lit("->"), lit("->>"),
- lit("<-"), lit("!>"), lit("<!"), lit("prn"), nil
+ lit("<-"), lit("!>"), lit("<!"), lit("prn"),
+ lit("i"), lit("o"), lit("x"), lit("b"), lit("c"), lit("r"),
+ lit("iz"), lit("oz"), lit("xz"), lit("bz"), lit("cz"), lit("rz"),
+ nil
};
set_dlt_entries_sys(dlt, sys_name, fun);