fix: use sane mapreduce method

Author: AayushSabharwal

src/array-lib.jl

@@ -372,8 +372,7 @@ end
         Term{Any}(_mapreduce, [f, g, x, dims, (kw...,)]))
 end false
 
-for (ff, opts) in [sum => (identity, +, false),
-    prod => (identity, *, true),
+for (ff, opts) in [
     any => (identity, (|), false),
     all => (identity, (&), true)]
 
@@ -387,3 +386,17 @@ for (ff, opts) in [sum => (identity, +, false),
         mapreduce(f, $g, x, dims=dims, init=init)
     end false
 end
+
+for (ff, opts) in [sum => (identity, +),
+    prod => (identity, *)]
+
+    f, g = opts
+    @eval @wrapped function (::$(typeof(ff)))(x::AbstractArray;
+        dims=:, kw...)
+        mapreduce($f, $g, x, dims=dims, kw...)
+    end false
+    @eval @wrapped function (::$(typeof(ff)))(f::Function, x::AbstractArray;
+        dims=:, kw...)
+        mapreduce(f, $g, x, dims=dims, kw...)
+    end false
+end