diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux.lux | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux index 20122f66c..e46090db0 100644 --- a/stdlib/source/library/lux.lux +++ b/stdlib/source/library/lux.lux @@ -3910,12 +3910,17 @@ [[t_module t_name] ["" (..module_alias (list t_name) alias)]]) tags) - pattern (|> locals - (list#each (function (_ [slot binding]) - (list (symbol$ slot) - (symbol$ binding)))) - list#conjoint - tuple$)] + pattern (case locals + (^ (list [slot binding])) + (symbol$ binding) + + _ + (|> locals + (list#each (function (_ [slot binding]) + (list (symbol$ slot) + (symbol$ binding)))) + list#conjoint + tuple$))] (do meta_monad [enhanced_target (monad#mix meta_monad (function (_ [[_ m_local] m_type] enhanced_target) |