diff options
Diffstat (limited to 'new-luxc/source/luxc/lang/extension.lux')
| -rw-r--r-- | new-luxc/source/luxc/lang/extension.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/lang/extension.lux b/new-luxc/source/luxc/lang/extension.lux index e8121b9b6..ef7a4f864 100644 --- a/new-luxc/source/luxc/lang/extension.lux +++ b/new-luxc/source/luxc/lang/extension.lux @@ -4,7 +4,7 @@ ["ex" exception #+ exception:]) (data ["e" error] [text] - (coll [dict #+ Dict])) + (coll (dictionary ["dict" unordered #+ Dict]))) [macro]) [//] (// ["la" analysis] @@ -39,7 +39,7 @@ (-> (List Code) (Meta Code))) (type: #export Statement - (-> (List Code) (Meta Unit))) + (-> (List Code) (Meta Top))) (type: #export Extensions {#analysis (Dict Text Analysis) @@ -61,9 +61,9 @@ (|> compiler (get@ #.extensions) (:! Extensions))]))) (def: (set extensions) - (-> Extensions (Meta Unit)) + (-> Extensions (Meta Top)) (function (_ compiler) - (#e.Success [(set@ #.extensions (:! Void extensions) compiler) + (#e.Success [(set@ #.extensions (:! Bottom extensions) compiler) []]))) (do-template [<name> <type> <category> <exception>] @@ -99,7 +99,7 @@ (do-template [<name> <type> <category> <exception>] [(def: #export (<name> name extension) - (-> Text <type> (Meta Unit)) + (-> Text <type> (Meta Top)) (do macro.Monad<Meta> [extensions ..get _ (//.assert <exception> name |