





context("Testing get_posterior_distribution")

testthat::test_that(desc = "Without",

                    code = {
                      # model <- make_model("X -> Y")
                      # expect_warning(
                      #   CausalQueries:::get_posterior_distribution(model = model),
                      #   "'get_posterior_distribution' is deprecated."
                      # )
                    })

testthat::test_that(desc = "With",

                    code = {
                      # model <- make_model("X -> Y") |> update_model()
                      # expect_warning(
                      #   get_posterior_distribution(model = model),
                      #   "'get_posterior_distribution' is deprecated."
                      # )
                    })

