aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/project.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-25 09:22:38 -0400
committerEduardo Julian2020-12-25 09:22:38 -0400
commit4ca397765805eda5ddee393901ed3a02001a960a (patch)
tree2ab184a1a4e244f3a69e86c8a7bb3ad49c22b4a3 /stdlib/source/program/aedifex/project.lux
parentd29e091e98dabb8dfcf816899ada480ecbf7e357 (diff)
Replaced kebab-case with snake_case for naming convention.
Diffstat (limited to 'stdlib/source/program/aedifex/project.lux')
-rw-r--r--stdlib/source/program/aedifex/project.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux
index bd191fffb..5dce87e0a 100644
--- a/stdlib/source/program/aedifex/project.lux
+++ b/stdlib/source/program/aedifex/project.lux
@@ -25,7 +25,7 @@
(def: #export (project name profile)
(-> Name Profile Project)
- (dictionary.from-list text.hash (list [name profile])))
+ (dictionary.from_list text.hash (list [name profile])))
(def: #export equivalence
(Equivalence Project)
@@ -38,13 +38,13 @@
(dictionary.new text.hash))
(def: compose
- (dictionary.merge-with (\ //.monoid compose))))
+ (dictionary.merge_with (\ //.monoid compose))))
-(exception: #export (unknown-profile {name Name})
+(exception: #export (unknown_profile {name Name})
(exception.report
["Name" (%.text name)]))
-(exception: #export (circular-dependency {dependee Name} {dependent Name})
+(exception: #export (circular_dependency {dependee Name} {dependent Name})
(exception.report
["Dependent" (%.text dependent)]
["Dependee" (%.text dependee)]))
@@ -56,7 +56,7 @@
(case (list.find (set.member? lineage)
(get@ #//.parents profile))
(#.Some ouroboros)
- (exception.throw ..circular-dependency [ouroboros name])
+ (exception.throw ..circular_dependency [ouroboros name])
#.None
(do {! try.monad}
@@ -68,7 +68,7 @@
parents))))
#.None
- (exception.throw ..unknown-profile [name])))
+ (exception.throw ..unknown_profile [name])))
(def: #export (profile name project)
(-> Name Project (Try Profile))