diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2014-02-25 19:37:28 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2014-02-25 19:37:28 -0800 |
commit | 0e956fe2a1e390ba433825aa9e1cf125174e68d5 (patch) | |
tree | 636da1786542e3069ce9dd5f0b1a85d413406145 /lib.c | |
parent | 9c580d08c3e92c17970fb8962a3c0f0f2b9cc5f1 (diff) | |
download | txr-0e956fe2a1e390ba433825aa9e1cf125174e68d5.tar.gz txr-0e956fe2a1e390ba433825aa9e1cf125174e68d5.tar.bz2 txr-0e956fe2a1e390ba433825aa9e1cf125174e68d5.zip |
* lib.c (obj_init): Revert qquote, unquote and splice
to the system namespace, for hygiene.
* txr.1: Updated.
Diffstat (limited to 'lib.c')
-rw-r--r-- | lib.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -5094,9 +5094,9 @@ static void obj_init(void) nongreedy_s = intern(lit("ng0+"), user_package); compiled_regex_s = intern(lit("compiled-regex"), 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); + qquote_s = intern(lit("qquote"), system_package); + unquote_s = intern(lit("unquote"), system_package); + splice_s = intern(lit("splice"), system_package); chset_s = intern(lit("chset"), system_package); set_s = intern(lit("set"), user_package); cset_s = intern(lit("cset"), user_package); |