summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog6
-rw-r--r--lib.c8
2 files changed, 10 insertions, 4 deletions
diff --git a/ChangeLog b/ChangeLog
index 02f27206..1664beed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
2014-02-22 Kaz Kylheku <kaz@kylheku.com>
+ * lib.c (obj_init): changing the quote, qquote, unquote
+ and splice symbols to be in the regular user package,
+ rather than the system package.
+
+2014-02-22 Kaz Kylheku <kaz@kylheku.com>
+
* parser.y: Allow the (. expr) syntax to denote expr.
* eval.h: Declare existing lambda_s extern variable.
diff --git a/lib.c b/lib.c
index 0c257102..21362724 100644
--- a/lib.c
+++ b/lib.c
@@ -5093,10 +5093,10 @@ static void obj_init(void)
regex_s = intern(lit("regex"), system_package);
nongreedy_s = intern(lit("ng0+"), user_package);
compiled_regex_s = intern(lit("compiled-regex"), system_package);
- quote_s = intern(lit("quote"), system_package);
- qquote_s = intern(lit("qquote"), system_package);
- unquote_s = intern(lit("unquote"), system_package);
- splice_s = intern(lit("splice"), system_package);
+ quote_s = intern(lit("quote"), user_package);
+ qquote_s = intern(lit("qquote"), user_package);
+ unquote_s = intern(lit("unquote"), user_package);
+ splice_s = intern(lit("splice"), user_package);
chset_s = intern(lit("chset"), system_package);
set_s = intern(lit("set"), user_package);
cset_s = intern(lit("cset"), user_package);