Error fixes for IntegralEquations#81

Author: cgeoga

src/compressor.jl

@@ -137,9 +137,13 @@ function _aca_partial(K, irange, jrange, atol, rmax, rtol, istart, buffer_ = not
             if isnothing(i)
                 # ran out of candidate rows. Good case: the matrix is zero. Bad
                 # case: aca failed
-                all(j -> iszero(K[first(irange), j]), jrange) &&
-                all(i -> iszero(K[i, first(jrange)]), irange) ||
-                    @warn "aca possibly failed on $irange × $jrange"
+                try
+                  all(j -> iszero(K[first(irange), j]), jrange) &&
+                  all(i -> iszero(K[i, first(jrange)]), irange) ||
+                      @warn "aca possibly failed on $irange × $jrange"
+                catch
+                  @warn "aca possibly failed on $irange × $jrange"
+                end
                 break
             end
         else # δ != 0

src/multiplication.jl

@@ -221,7 +221,7 @@ Multiplication when the target is a dense matrix. The numbering system in the fo
 function _mul_dense!(C::Base.Matrix, A, B, a)
     Adata = isleaf(A) ? data(A) : A
     Bdata = isleaf(B) ? data(B) : B
-    if Adata isa HMatrix
+    if Adata isa HMatrix || Adata isa Adjoint{Float64, H} where H <: HMatrix
         if Bdata isa Matrix
             _mul131!(C, Adata, Bdata, a)
         elseif Bdata isa RkMatrix
@@ -235,7 +235,7 @@ function _mul_dense!(C::Base.Matrix, A, B, a)
         elseif Bdata isa HMatrix
             _mul113!(C, Adata, Bdata, a)
         end
-    elseif Adata isa RkMatrix
+    elseif Adata isa RkMatrix || Adata isa Adjoint{Float64, H} where H <: RkMatrix
         if Bdata isa Matrix
             _mul121!(C, Adata, Bdata, a)
         elseif Bdata isa RkMatrix