Deprecate asintegerpoly

as mentioned in
#259 (comment)

Author: singularitti

src/common.jl

@@ -16,8 +16,7 @@ export fromroots,
        integrate,
        derivative,
        variable,
-       isintegerpoly,
-       asintegerpoly
+       isintegerpoly
 
 """
     fromroots(::AbstractVector{<:Number}; var=:x)
@@ -328,18 +327,8 @@ Base.real(p::AbstractPolynomial) = as_(real, p)
     isintegerpoly(p::AbstractPolynomial)
 
 Determine whether a polynomial is an integer polynomial, i.e., having only integers as coefficients.
-
-See also: [`asintegerpoly`](@ref)
 """
 isintegerpoly(p::AbstractPolynomial) = is_(isinteger, p)
-"""
-    asintegerpoly(p::AbstractPolynomial)
-
-Construct an integer polynomial from the coefficients of `p`.
-
-See also: [`isintegerpoly`](@ref)
-"""
-asintegerpoly(p::AbstractPolynomial) = as_(x -> convert(Integer, x), p)
 
 """
     coeffs(::AbstractPolynomial)

test/Poly.jl

@@ -432,14 +432,13 @@ fit(Poly, xx,yy,2)
     @test real(y) == real(x)
 end
 
-@testset "`isintegerpoly` and `asintegerpoly`" begin
+@testset "`isintegerpoly`" begin
     x = Polynomial([1 // 1, Int8(2) + 0im, 3.0, Int16(4) + 0im])
     y = Polynomial([1 // 2, Int8(2) + 0im, 3.0, Int16(4) + 0im])
     @test isintegerpoly(x) === true
-    @test eltype(asintegerpoly(x)) === Int
-    @test asintegerpoly(x) == Polynomial([1, 2, 3, 4])
     @test isintegerpoly(y) === false
-    @test_throws InexactError asintegerpoly(y)
+    @test convert(Polynomial{Int}, x) == Polynomial([1, 2, 3, 4])
+    @test_throws InexactError convert(Polynomial{Int}, y)
 end