aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-09-12 00:07:08 -0400
committerEduardo Julian2021-09-12 00:07:08 -0400
commitdda05bca0956af5e5b3875c4cc36e61aa04772e4 (patch)
tree0f8b27697d58ab5c8e41aba7c7c9f769d3800767 /stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
parentd48270f43c404ba19ca04da2553455ecaaf2caba (diff)
Made the "#" character great again!
Diffstat (limited to 'stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux')
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
index c78d07b6f..b5d364a3d 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
@@ -88,12 +88,12 @@
(def: owner
tar.Owner
- [#tar.name tar.anonymous
- #tar.id tar.no_id])
+ [tar.#name tar.anonymous
+ tar.#id tar.no_id])
(def: ownership
- [#tar.user ..owner
- #tar.group ..owner])
+ [tar.#user ..owner
+ tar.#group ..owner])
(def: (write_module now mapping [module [module_id [descriptor document output]]])
(-> Instant (Dictionary Module archive.ID)
@@ -104,7 +104,7 @@
(..bundle_module output))
entry_content (: (Try tar.Content)
(|> descriptor
- (value@ #descriptor.references)
+ (value@ descriptor.#references)
set.list
(list.all (function (_ module) (dictionary.value module mapping)))
(list\each (|>> ..module_file _.string _.load_relative/1))
@@ -114,7 +114,7 @@
(\ encoding.utf8 encoded)
tar.content))
module_file (tar.path (..module_file module_id))]
- (in {#tar.Normal [module_file now ..mode ..ownership entry_content]})))
+ (in {tar.#Normal [module_file now ..mode ..ownership entry_content]})))
(def: .public (package now)
(-> Instant Packager)