summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisplib.c13
1 files changed, 12 insertions, 1 deletions
diff --git a/lisplib.c b/lisplib.c
index 365714ed..d50b6899 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -125,7 +125,7 @@ static val ver_instantiate(val set_fun)
static val ifa_set_entries(val dlt, val fun)
{
val name[] = {
- lit("ifa"), lit("whena"), lit("conda"), lit("condlet"), nil
+ lit("ifa"), lit("whena"), lit("conda"), lit("condlet"), lit("it"), nil
};
set_dlt_entries(dlt, name, fun);
return nil;
@@ -384,7 +384,18 @@ static val awk_set_entries(val dlt, val fun)
val name[] = {
lit("awk"), nil
};
+ val name_noload[] = {
+ lit("rec"), lit("orec"), lit("f"), lit("nf"), lit("nr"), lit("fnr"),
+ lit("arg"), lit("fname"), lit("rs"), lit("krs"), lit("fs"), lit("ft"),
+ lit("fw"), lit("kfs"), lit("ofs"), lit("ors"), lit("next"), lit("again"),
+ 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
+ };
+
set_dlt_entries(dlt, name, fun);
+ intern_only(name_noload);
return nil;
}