@@ -24,7 +24,16 @@ function test_approx(
2424 @test_msg msg isapprox (actual, expected; kwargs... )
2525end
2626
27- for (T1, T2) in ((AbstractThunk, Any), (AbstractThunk, AbstractThunk), (Any, AbstractThunk))
27+ for (T1, T2) in
28+ (
29+ (AbstractThunk, Any),
30+ (AbstractThunk, AbstractThunk),
31+ (Any, AbstractThunk),
32+ (Tangent, AbstractThunk),
33+ (AbstractThunk, Tangent),
34+ (AbstractZero, AbstractThunk),
35+ (AbstractThunk, AbstractZero),
36+ )
2837 @eval function test_approx (actual:: $T1 , expected:: $T2 , msg= " " ; kwargs... )
2938 return test_approx (unthunk (actual), unthunk (expected), msg; kwargs... )
3039 end
@@ -123,9 +132,8 @@ function test_approx(actual::Tangent{P,T}, expected, msg=""; kwargs...) where {T
123132end
124133test_approx (x, y:: Tangent , msg= " " ; kwargs... ) = test_approx (y, x, msg; kwargs... )
125134
126- function test_approx (actual:: Tangent , expected:: AbstractThunk , msg= " " ; kwargs... )
127- return test_approx (actual, unthunk (expected), msg; kwargs... )
128- end
135+ test_approx (z:: NoTangent , t:: Tangent , msg= " " ; kwargs... ) = all (== (NoTangent ()), t)
136+ test_approx (t:: Tangent , z:: NoTangent , msg= " " ; kwargs... ) = all (== (NoTangent ()), t)
129137
130138# This catches comparisons of Tangents and Tuples/NamedTuple
131139# and gives an error message complaining about that. the `@test` will definitely fail
0 commit comments