diff options
| author | Eduardo Julian | 2022-06-16 00:48:19 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-06-16 00:48:19 -0400 |
| commit | 9e2f1e76f2c8df01ed7687d934c3210fcf676bd6 (patch) | |
| tree | 115fab5bd8a5f53dc0d13ce5453095324a83496f /stdlib/source/test/aedifex/metadata | |
| parent | f92c806ee8da63f04bbefbf558f6249bacdb47ea (diff) | |
De-sigil-ification: suffix : [Part 13]
Diffstat (limited to 'stdlib/source/test/aedifex/metadata')
| -rw-r--r-- | stdlib/source/test/aedifex/metadata/artifact.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/metadata/snapshot.lux | 8 |
2 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux index 041bad539..a43777707 100644 --- a/stdlib/source/test/aedifex/metadata/artifact.lux +++ b/stdlib/source/test/aedifex/metadata/artifact.lux @@ -41,7 +41,7 @@ ["[1][0]" repository ["[1]/[0]" local]]]]]]) -(def: .public random +(def .public random (Random /.Metadata) (all random.and (random.alphabetic 5) @@ -66,7 +66,7 @@ time.#milli_second 0])] (in (instant.of_date_time date time)))))))) -(def: .public test +(def .public test Test (<| (_.covering /._) (_.for [/.Metadata]) diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux index 7cff9954a..a40ed0553 100644 --- a/stdlib/source/test/aedifex/metadata/snapshot.lux +++ b/stdlib/source/test/aedifex/metadata/snapshot.lux @@ -49,7 +49,7 @@ ["[1][0]" repository ["[1]/[0]" local]]]]]]) -(def: random_instant +(def random_instant (Random Instant) (do [! random.monad] [year (at ! each (|>> (n.% 9,000) (n.+ 1,000) .int) random.nat) @@ -70,7 +70,7 @@ time.#milli_second 0])] (in (instant.of_date_time date time))))))) -(def: random_versioning +(def random_versioning (Random Versioning) (all random.and (random#in {///snapshot.#Local}) @@ -78,14 +78,14 @@ (random.list 5 $///artifact/snapshot/version.random) )) -(def: .public random +(def .public random (Random /.Metadata) (all random.and $///artifact.random ..random_versioning )) -(def: .public test +(def .public test Test (<| (_.covering /._) (_.for [/.Metadata]) |