Fix Base.cld() for FixedDecimals.

Before:
```julia

julia> let FD2 = FixedDecimal{Int,2}
           cld(FD2(0.01), FD2(2))
       end
FixedDecimal{Int64,2}(0.00)
```
After:
```julia
julia> let FD2 = FixedDecimal{Int,2}
           cld(FD2(0.01), FD2(2))
       end
FixedDecimal{Int64,2}(1.00)
```

Author: NHDaly

src/FixedPointDecimals.jl

@@ -300,12 +300,14 @@ end
 for remfn in [:rem, :mod, :mod1, :min, :max]
     @eval $remfn(x::T, y::T) where {T <: FD} = reinterpret(T, $remfn(x.i, y.i))
 end
-for divfn in [:div, :fld, :fld1]
+for divfn in [:div, :fld, :fld1, :cld]
     # div(x.i, y.i) eliminates the scaling coefficient, so we call the FD constructor.
     # We don't need any widening logic, since we won't be multiplying by the coefficient.
-    @eval $divfn(x::T, y::T) where {T <: FD} = T($divfn(x.i, y.i))
+    @eval Base.$divfn(x::T, y::T) where {T <: FD} = T($divfn(x.i, y.i))
 end
 if VERSION >= v"1.4.0-"
+    # div(x.i, y.i) eliminates the scaling coefficient, so we call the FD constructor.
+    # We don't need any widening logic, since we won't be multiplying by the coefficient.
     Base.div(x::T, y::T, r::RoundingMode) where {T <: FD} = T(div(x.i, y.i, r))
 end
 

test/runtests.jl

@@ -545,6 +545,9 @@ end
                 end
             end
         end
+        @testset for x in keyvalues[FD2], f in (fld, cld, fld1, div)
+            @test f(x, 2one(x)) === f(x, 2) === FD2(f(x.i, FD2(2).i))
+        end
     end
 end