aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/runtime.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-06-30 23:24:55 -0400
committerEduardo Julian2021-06-30 23:24:55 -0400
commit744ee69630de59ca3ba660b0aab6361cd17ce1b4 (patch)
tree329c11b8c3522c319c99ebd4d7c51ee0e7464bae /stdlib/source/test/aedifex/runtime.lux
parent6633cd42f2892ea71530ddeeb93a7e7c0b59faa3 (diff)
"signature:" -> "interface:" & "structure:" -> "implementation:"
"signature" & "structure" feel like very ML-specific terminology and might not be easy on programmers unfamiliar with it.
Diffstat (limited to 'stdlib/source/test/aedifex/runtime.lux')
-rw-r--r--stdlib/source/test/aedifex/runtime.lux5
1 files changed, 3 insertions, 2 deletions
diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux
index 17b3428d2..0143eaac8 100644
--- a/stdlib/source/test/aedifex/runtime.lux
+++ b/stdlib/source/test/aedifex/runtime.lux
@@ -18,8 +18,9 @@
(`` ($_ _.and
(~~ (template [<command>]
[(_.cover [<command>]
- (let [command (<command> path)]
- (and (text.starts_with? (<command> "") command)
+ (let [command (text.join_with " " (#.Cons (<command> path)))
+ pure_command (text.join_with " " (#.Cons (<command> "")))]
+ (and (text.starts_with? pure_command command)
(text.ends_with? path command))))]
[/.java]