aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux b/stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux
index c4c6da56d..853b83c3d 100644
--- a/stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux
+++ b/stdlib/source/library/lux/meta/compiler/language/lux/analysis/coverage.lux
@@ -101,8 +101,8 @@
[#Text])
[{#Variant allR casesR} {#Variant allS casesS}]
- (and (at (maybe.equivalence n.equivalence) = allR allS)
- (at (dictionary.equivalence =) = casesR casesS))
+ (and (of (maybe.equivalence n.equivalence) = allR allS)
+ (of (dictionary.equivalence =) = casesR casesS))
[{#Seq leftR rightR} {#Seq leftS rightS}]
(and (= leftR leftS)
@@ -301,7 +301,7 @@
(n.> so_far_cases (..minimum addition')))))
(exception.except ..variant_mismatch [so_far_cases addition_cases])
- (at (dictionary.equivalence ..equivalence) = casesSF casesA)
+ (of (dictionary.equivalence ..equivalence) = casesSF casesA)
<redundancy>
... else