Try to skip segfaulting tests

Author: penelopeysm

test/mcmc/gibbs.jl

@@ -268,7 +268,7 @@ end
     @test chain1.value == chain2.value
 end
 
-@testset "Testing gibbs.jl with $adbackend" for adbackend in ADUtils.adbackends
+@testset "Testing gibbs.jl with $adbackend" for adbackend in ADUtils.adbackends[3:end]
     @info "Starting Gibbs tests with $adbackend"
     @testset "Deprecated Gibbs constructors" begin
         N = 10
@@ -371,7 +371,7 @@ end
                 (@varname(mu1), @varname(mu2)) => HMC(0.15, 3; adtype=adbackend),
             )
             chain = sample(MoGtest_default, gibbs, 2_000)
-            check_MoGtest_default(chain; atol=0.15)
+            check_MoGtest_default(chain; atol=0.15, skip=(adtype isa AutoMooncake && Sys.ARCH == :i686)
         end
 
         @testset "Multiple overlapping samplers on gdemo" begin

test/test_utils/numerical_tests.jl

@@ -8,7 +8,9 @@ using HypothesisTests: HypothesisTests
 export check_MoGtest_default,
     check_MoGtest_default_z_vector, check_dist_numerical, check_gdemo, check_numerical
 
-function check_dist_numerical(dist, chn; mean_tol=0.1, var_atol=1.0, var_tol=0.5)
+function check_dist_numerical(
+    dist, chn; mean_tol=0.1, var_atol=1.0, var_tol=0.5, broken=false, skip=false
+)
     @testset "numerical" begin
         # Extract values.
         chn_xs = Array(chn[1:2:end, namesingroup(chn, :x), :])
@@ -24,7 +26,7 @@ function check_dist_numerical(dist, chn; mean_tol=0.1, var_atol=1.0, var_tol=0.5
             else
                 max(mean_tol, mean_tol * chn_mean)
             end
-            @test chn_mean ≈ dist_mean atol = atol_m
+            @test chn_mean ≈ dist_mean atol = atol_m broken = broken skip = skip
         end
 
         # Check variances.
@@ -41,44 +43,52 @@ function check_dist_numerical(dist, chn; mean_tol=0.1, var_atol=1.0, var_tol=0.5
                 else
                     max(mean_tol, mean_tol * chn_mean)
                 end
-                @test chn_mean ≈ dist_mean atol = atol_v
+                @test chn_mean ≈ dist_mean atol = atol_v broken = broken skip = skip
             end
         end
     end
 end
 
 # Helper function for numerical tests
-function check_numerical(chain, symbols::Vector, exact_vals::Vector; atol=0.2, rtol=0.0)
+function check_numerical(
+    chain, symbols::Vector, exact_vals::Vector; atol=0.2, rtol=0.0, broken=false, skip=false
+)
     for (sym, val) in zip(symbols, exact_vals)
         E = val isa Real ? mean(chain[sym]) : vec(mean(chain[sym]; dims=1))
         @info (symbol=sym, exact=val, evaluated=E)
-        @test E ≈ val atol = atol rtol = rtol
+        @test E ≈ val atol = atol rtol = rtol broken = broken skip = skip
     end
 end
 
 # Wrapper function to quickly check gdemo accuracy.
-function check_gdemo(chain; atol=0.2, rtol=0.0)
-    return check_numerical(chain, [:s, :m], [49 / 24, 7 / 6]; atol=atol, rtol=rtol)
+function check_gdemo(chain; atol=0.2, rtol=0.0, broken=false, skip=false)
+    return check_numerical(
+        chain, [:s, :m], [49 / 24, 7 / 6]; atol=atol, rtol=rtol, broken=broken, skip=skip
+    )
 end
 
 # Wrapper function to check MoGtest.
-function check_MoGtest_default(chain; atol=0.2, rtol=0.0)
+function check_MoGtest_default(chain; atol=0.2, rtol=0.0, broken=false, skip=false)
     return check_numerical(
         chain,
         [:z1, :z2, :z3, :z4, :mu1, :mu2],
         [1.0, 1.0, 2.0, 2.0, 1.0, 4.0];
         atol=atol,
         rtol=rtol,
+        broken=broken,
+        skip=skip,
     )
 end
 
-function check_MoGtest_default_z_vector(chain; atol=0.2, rtol=0.0)
+function check_MoGtest_default_z_vector(chain; atol=0.2, rtol=0.0, broken=false, skip=false)
     return check_numerical(
         chain,
         [Symbol("z[1]"), Symbol("z[2]"), Symbol("z[3]"), Symbol("z[4]"), :mu1, :mu2],
         [1.0, 1.0, 2.0, 2.0, 1.0, 4.0];
         atol=atol,
         rtol=rtol,
+        broken=broken,
+        skip=skip,
     )
 end