Add Base.ispositive, Base.isnegative

Author: barucden

src/decimal.jl

@@ -19,6 +19,11 @@ Base.iszero(x::Decimal) = iszero(x.c)
 Base.isfinite(x::Decimal) = true
 Base.isnan(x::Decimal) = false
 
+if VERSION ≥ v"1.13"
+    Base.ispositive(x::Decimal) = !x.s && !iszero(x.c)
+    Base.isnegative(x::Decimal) = x.s && !iszero(x.c)
+end
+
 """
     normalize(x::Decimal)
 

test/test_decimal.jl

@@ -57,6 +57,16 @@ end
 
     @test isfinite(Decimal(0, 1, 1))
     @test !isnan(Decimal(0, 1, 1))
+
+    if VERSION ≥ v"1.13"
+        @test ispositive(Decimal(0, 1, 0))
+        @test !ispositive(Decimal(0, 0, 1))
+        @test !ispositive(Decimal(1, 1, 0))
+
+        @test isnegative(Decimal(1, 1, 0))
+        @test !isnegative(Decimal(0, 0, 1))
+        @test !isnegative(Decimal(0, 1, 0))
+    end
 end
 
 @testset "Normalize" begin