add some istrues (#109)

Author: cscherrer

src/combinators/pointwise.jl

@@ -15,7 +15,7 @@ end
 
 @inbounds function insupport(d::PointwiseProductMeasure, p)
     prior, ℓ = d
-    insupport(prior, p) && insupport(ℓ, p)
+    istrue(insupport(prior, p)) && istrue(insupport(ℓ, p))
 end
 
 @inline function logdensity_def(d::PointwiseProductMeasure, p)

src/density-core.jl

@@ -89,8 +89,8 @@ known to be in the support of both, it can be more efficient to call
     )
     inμ = insupport(μ, x)
     inν = insupport(ν, x)
-    inμ || return convert(T, ifelse(inν, -Inf, NaN))
-    inν || return convert(T, Inf)
+    istrue(inμ) || return convert(T, ifelse(inν, -Inf, NaN))
+    istrue(inν) || return convert(T, Inf)
 
     return unsafe_logdensity_rel(μ, ν, x)
 end

src/interface.jl

@@ -4,7 +4,7 @@ using Reexport
 
 @reexport using MeasureBase
 
-using MeasureBase: basemeasure_depth, proxy
+using MeasureBase: basemeasure_depth, proxy, istrue
 using MeasureBase: insupport, basemeasure_sequence, commonbase
 using MeasureBase: transport_to, NoTransport
 
@@ -119,7 +119,7 @@ function test_smf(μ, n = 100)
         @assert issorted(p)
         x = invsmf.(μ, p)
         @test issorted(x)
-        @test all(insupport(μ), x)
+        @test all(istrue ∘ insupport(μ), x)
 
         @test all((Finv ∘ F).(x) .≈ x)