From f2d1c591814a055b48dab3a72b3cddef0d1b0974 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 3 Dec 2017 16:16:50 -0400 Subject: - Fixed some small issues uncovered by new-luxc. --- stdlib/test/test/lux/data/coll/stack.lux | 2 +- stdlib/test/test/lux/math/logic/fuzzy.lux | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) (limited to 'stdlib/test') diff --git a/stdlib/test/test/lux/data/coll/stack.lux b/stdlib/test/test/lux/data/coll/stack.lux index 2cbd2a1ab..c5f1e598f 100644 --- a/stdlib/test/test/lux/data/coll/stack.lux +++ b/stdlib/test/test/lux/data/coll/stack.lux @@ -30,7 +30,7 @@ (#.Some _) (not (&.empty? sample)))) (test "Popping empty stacks doesn't change anything. - But, if they're non-empty, the top of the stack is removed." + But, if they're non-empty, the top of the stack is removed." (let [sample' (&.pop sample)] (or (n/= (&.size sample) (n/inc (&.size sample'))) (and (&.empty? sample) (&.empty? sample'))) diff --git a/stdlib/test/test/lux/math/logic/fuzzy.lux b/stdlib/test/test/lux/math/logic/fuzzy.lux index 50423a973..a1c01408c 100644 --- a/stdlib/test/test/lux/math/logic/fuzzy.lux +++ b/stdlib/test/test/lux/math/logic/fuzzy.lux @@ -160,12 +160,12 @@ sample (|> r.nat (:: @ map (n/% +20)))] ($_ seq (test "Values that satisfy a predicate have membership = 1. - Values that don't have membership = 0." + Values that don't have membership = 0." (B/= (d/= ~true (&.membership sample (&.from-predicate n/even?))) (n/even? sample))) (test "Values that belong to a set have membership = 1. - Values that don't have membership = 0." + Values that don't have membership = 0." (B/= (d/= ~true (&.membership sample (&.from-set set-10))) (set.member? set-10 sample))) )))) -- cgit v1.2.3