aboutsummaryrefslogtreecommitdiff
path: root/source/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2015-07-25 20:19:43 -0400
committerEduardo Julian2015-07-25 20:19:43 -0400
commit4cd9b0c9242f1105e50ad9b42b7f6f5d074f14b4 (patch)
treed8828396e3f76e5b5dabb1f530234047ec239794 /source/lux.lux
parent6c51e5e50aa98bb26a3e2b34f57a0e24f8537d93 (diff)
- The output directory is now being used as the cache.
- "input" has been renamed as "source" and "output" has been renamed as "target".
Diffstat (limited to '')
-rw-r--r--source/lux.lux (renamed from input/lux.lux)10
1 files changed, 5 insertions, 5 deletions
diff --git a/input/lux.lux b/source/lux.lux
index 61d99396c..50f8f1af2 100644
--- a/input/lux.lux
+++ b/source/lux.lux
@@ -1880,7 +1880,7 @@
(deftype Referrals
(| #All
(#Only (List Text))
- (#Except (List Text))
+ (#Exclude (List Text))
#Nothing))
(deftype Import
@@ -1896,7 +1896,7 @@
(return name)
_
- (fail "only/except requires symbols."))))
+ (fail "only/exclude requires symbols."))))
defs))
(def (parse-alias tokens)
@@ -1921,10 +1921,10 @@
[defs' (extract-defs defs)]
(return (: (, Referrals (List Syntax)) [(#Only defs') tokens'])))
- (\ (#Meta [_ (#FormS (list& (#Meta [_ (#TagS ["" "except"])]) defs))]))
+ (\ (#Meta [_ (#FormS (list& (#Meta [_ (#TagS ["" "exclude"])]) defs))]))
(do Lux/Monad
[defs' (extract-defs defs)]
- (return (: (, Referrals (List Syntax)) [(#Except defs') tokens'])))
+ (return (: (, Referrals (List Syntax)) [(#Exclude defs') tokens'])))
_
(fail "Incorrect syntax for referral."))
@@ -2166,7 +2166,7 @@
[*defs (exported-defs m-name)]
(;return (filter (is-member? +defs) *defs)))
- (#Except -defs)
+ (#Exclude -defs)
(do Lux/Monad
[*defs (exported-defs m-name)]
(;return (filter (. not (is-member? -defs)) *defs)))