diff options
author | Eduardo Julian | 2022-06-03 22:08:18 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-06-03 22:08:18 -0400 |
commit | f2172051a91bbb2578918dc784a053a321849b63 (patch) | |
tree | 5e49152d0992cadf9420a055cc24cabafc4e7972 /stdlib/source/library/lux.lux | |
parent | 3e7d188cbe7bc9bce4a14318e2f62583fe2501d1 (diff) |
Extensible import syntax [Part 5]
Diffstat (limited to 'stdlib/source/library/lux.lux')
-rw-r--r-- | stdlib/source/library/lux.lux | 20 |
1 files changed, 1 insertions, 19 deletions
diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux index def83aa1c..633ec16ce 100644 --- a/stdlib/source/library/lux.lux +++ b/stdlib/source/library/lux.lux @@ -3420,7 +3420,7 @@ (pattern (list)) (meta#in [(if aliased? - {#Referral [(symbol ..none) (list)]} + {#Referral [(symbol ..only) (list)]} {#Nothing}) (list)]) @@ -3764,24 +3764,6 @@ {.#None} (failure (..wrong_syntax_error (symbol ..except))))) -(template [<simple> <complex>] - [(macro: .public (<simple> tokens) - (case (..parsed (all ..andP - ..anyP - ..anyP) - tokens) - {.#Some [current_module imported_module]} - (meta#in (list (` (<complex> (~ current_module) (~ imported_module))))) - - {.#None} - (let [[module _] (symbol .._) - [_ short] (symbol <simple>)] - (failure (..wrong_syntax_error [module short])))))] - - [full ..except] - [none ..only] - ) - (def: (in_env name state) (-> Text Lux (Maybe Type)) (case state |