aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-08-18 03:29:15 -0400
committerEduardo Julian2021-08-18 03:29:15 -0400
commite00ba096c8837abe85d366e0c1293c09dbe84d81 (patch)
treedc1f0955d4461ae30bb4945cddd74c462f1aee98 /stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
parent3289b9dcf9d5d1c1e5c380e3185065c8fd32535f (diff)
Some bug fixes.
Diffstat (limited to 'stdlib/source/test/aedifex/artifact/snapshot/version/value.lux')
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/version/value.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
index ada815059..915d283da 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
@@ -47,18 +47,18 @@
(do random.monad
[sample random
stamp $///stamp.random]
- (let [version (get@ #/.version sample)
+ (let [version (value@ #/.version sample)
local!
(text\= version
- (/.format (set@ #/.snapshot #///.Local sample)))
+ (/.format (with@ #/.snapshot #///.Local sample)))
remote_format (/.format {#/.version (format version /.snapshot)
#/.snapshot (#///.Remote stamp)})
remote!
- (and (text.starts_with? (format version (///time.format (get@ #///stamp.time stamp)))
+ (and (text.starts_with? (format version (///time.format (value@ #///stamp.time stamp)))
remote_format)
- (text.ends_with? (%.nat (get@ #///stamp.build stamp))
+ (text.ends_with? (%.nat (value@ #///stamp.build stamp))
remote_format))]
(_.cover [/.snapshot /.format]
(and local!