let
    mvn = MvNormal([1.2,2.3], [1.4 1.0; 1.0 1.2])

    @test isapprox(pdf(mvn, [1.0, 1.0]),  0.04794537749882221)

    println("There should NOT be a warning between here")
    r = rand(MersenneTwister(12), mvn)
    println("and here.")
    # @test isa(r, sampletype(mvn))

    println("There should be a warning below.")
    mn = Multinomial(4, 8)
    r = rand(MersenneTwister(12), mn)
    # @test isa(r, sampletype(mn))

    println("There should NOT be a warning between here")
    cat = Categorical(3)
    r = rand(MersenneTwister(12), cat)
    println("and here.")
    # @test isa(r, sampletype(cat))
end
