let test_stats_cmp tolerate broadcasting

PDLPorters · Apr 4, 2024 · 9432545 · 9432545
1 parent f6170af
commit 9432545
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/stats_glm.t b/t/stats_glm.t
@@ -489,7 +489,7 @@ sub test_stats_cmp {
       ($got, $exp) = map &$func($_), $got, $exp;
     }
     $exp = PDL->topdl($exp);
-    $error += my $this_diff = $got - $exp;
+    $error = $error + (my $this_diff = $got - $exp);
     fail($_), diag "got $m->{$_}\nexpected $exp" if any($this_diff->abs > $eps);
   }
   return $error;