diff options
| author | Eduardo Julian | 2022-04-08 21:32:38 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-04-08 21:32:38 -0400 |
| commit | 120ebb44dbb1a20fc150e5e58099f90be2e61d49 (patch) | |
| tree | 32bcc24d1a48989faf4207bbce423c483b9ce1ba /stdlib/source/test/aedifex/repository | |
| parent | 0d909187d5b9effcd08f533d50af7d29c0d6bfd8 (diff) | |
Better names for random text/character generators.
Diffstat (limited to 'stdlib/source/test/aedifex/repository')
| -rw-r--r-- | stdlib/source/test/aedifex/repository/identity.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/repository/local.lux | 10 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/repository/origin.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/repository/remote.lux | 10 |
4 files changed, 14 insertions, 14 deletions
diff --git a/stdlib/source/test/aedifex/repository/identity.lux b/stdlib/source/test/aedifex/repository/identity.lux index 5e357ecca..e1b67e424 100644 --- a/stdlib/source/test/aedifex/repository/identity.lux +++ b/stdlib/source/test/aedifex/repository/identity.lux @@ -13,8 +13,8 @@ (def: .public random (Random /.Identity) (all random.and - (random.ascii/alpha 10) - (random.ascii/alpha 10) + (random.alphabetic 10) + (random.alphabetic 10) )) (def: .public test diff --git a/stdlib/source/test/aedifex/repository/local.lux b/stdlib/source/test/aedifex/repository/local.lux index c5da9011d..92826c8ff 100644 --- a/stdlib/source/test/aedifex/repository/local.lux +++ b/stdlib/source/test/aedifex/repository/local.lux @@ -27,16 +27,16 @@ Test (<| (_.covering /._) (do [! random.monad] - [/ (random.ascii/upper 1) - home (random.ascii/lower 10) - working_directory (random.ascii/lower 10) + [/ (random.upper_case 1) + home (random.lower_case 10) + working_directory (random.lower_case 10) .let [fs (file.mock /) program (program.async (program.mock environment.empty home working_directory)) repo (/.repository program fs)] - uri (random.ascii/lower 10) + uri (random.lower_case 10) expected (# ! each (# utf8.codec encoded) - (random.ascii/lower 10))] + (random.lower_case 10))] (all _.and (in (do async.monad [before_upload (# repo download uri) diff --git a/stdlib/source/test/aedifex/repository/origin.lux b/stdlib/source/test/aedifex/repository/origin.lux index a0bcff68d..90a0f89dd 100644 --- a/stdlib/source/test/aedifex/repository/origin.lux +++ b/stdlib/source/test/aedifex/repository/origin.lux @@ -13,8 +13,8 @@ (def: .public random (Random /.Origin) (all random.or - (random.ascii/alpha 10) - (random.ascii/alpha 10) + (random.alphabetic 10) + (random.alphabetic 10) )) (def: .public test diff --git a/stdlib/source/test/aedifex/repository/remote.lux b/stdlib/source/test/aedifex/repository/remote.lux index abf123f4b..05cd293c3 100644 --- a/stdlib/source/test/aedifex/repository/remote.lux +++ b/stdlib/source/test/aedifex/repository/remote.lux @@ -84,14 +84,14 @@ Test (<| (_.covering /._) (do [! random.monad] - [address (random.ascii/upper 10) - uri (random.ascii/lower 10) + [address (random.upper_case 10) + uri (random.lower_case 10) - user (random.ascii/lower 10) - password (random.ascii/lower 10) + user (random.lower_case 10) + password (random.lower_case 10) content (# ! each (# utf8.codec encoded) - (random.ascii/lower 10))] + (random.lower_case 10))] (all _.and (_.cover [/.repository /.user_agent /.Address] (let [repo (/.repository (..good_http user password) |