diff options
author | Eduardo Julian | 2021-09-12 00:07:08 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-09-12 00:07:08 -0400 |
commit | dda05bca0956af5e5b3875c4cc36e61aa04772e4 (patch) | |
tree | 0f8b27697d58ab5c8e41aba7c7c9f769d3800767 /stdlib/source/program/aedifex/project.lux | |
parent | d48270f43c404ba19ca04da2553455ecaaf2caba (diff) |
Made the "#" character great again!
Diffstat (limited to 'stdlib/source/program/aedifex/project.lux')
-rw-r--r-- | stdlib/source/program/aedifex/project.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux index acf3c3819..aedae9c64 100644 --- a/stdlib/source/program/aedifex/project.lux +++ b/stdlib/source/program/aedifex/project.lux @@ -54,22 +54,22 @@ (def: (profile' lineage project name) (-> (Set Name) Project Name (Try Profile)) (case (dictionary.value name project) - {#.Some profile} + {.#Some profile} (case (list.example (set.member? lineage) - (value@ #//.parents profile)) - {#.Some ouroboros} + (value@ //.#parents profile)) + {.#Some ouroboros} (exception.except ..circular_dependency [ouroboros name]) - #.None + {.#None} (do [! try.monad] [parents (monad.each ! (profile' (set.has name lineage) project) - (value@ #//.parents profile))] + (value@ //.#parents profile))] (in (list\mix (function (_ parent child) (\ //.monoid composite child parent)) - (with@ #//.parents (list) profile) + (with@ //.#parents (list) profile) parents)))) - #.None + {.#None} (exception.except ..unknown_profile [name]))) (def: .public profile |