diff options
| author | Eduardo Julian | 2020-10-25 23:16:14 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-10-25 23:16:14 -0400 |
| commit | cb8f2b36352948108446c7e3b270faa97589bf7a (patch) | |
| tree | 25ebf796bbbd3ad31519745b7276d38f6c19726c /stdlib/source/test/aedifex | |
| parent | 72b4eecdc514387ab3b1c105cfd49436c9eb1e8d (diff) | |
Some small refactoring.
Diffstat (limited to 'stdlib/source/test/aedifex')
| -rw-r--r-- | stdlib/source/test/aedifex/command/pom.lux | 2 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/input.lux | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux index 1bb098de0..cd0eed8e9 100644 --- a/stdlib/source/test/aedifex/command/pom.lux +++ b/stdlib/source/test/aedifex/command/pom.lux @@ -33,7 +33,7 @@ (<| (_.covering /._) (do random.monad [sample @profile.random - #let [fs (file.mock (:: file.system separator))]] + #let [fs (file.mock (:: file.default separator))]] (wrap (do {@ promise.monad} [outcome (/.do! fs sample)] (case outcome diff --git a/stdlib/source/test/aedifex/input.lux b/stdlib/source/test/aedifex/input.lux index 39a71eb81..50b99a218 100644 --- a/stdlib/source/test/aedifex/input.lux +++ b/stdlib/source/test/aedifex/input.lux @@ -34,7 +34,7 @@ (do {@ random.monad} [expected (:: @ map (set@ #//.parents (list)) @profile.random) #let [fs (: (file.System Promise) - (file.mock (:: file.system separator)))]] + (file.mock (:: file.default separator)))]] (wrap (do promise.monad [verdict (do //action.monad [file (: (Promise (Try (File Promise))) |