Merge branch 'ubsan'

vegandevs · Nov 27, 2024 · e1c3e43 · e1c3e43
2 parents 29aa6b7 + 71a8b1c
commit e1c3e43
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/getF.c b/src/getF.c
@@ -337,7 +337,7 @@ SEXP do_getF(SEXP perms, SEXP E, SEXP QR, SEXP QZ,  SEXP effects,
 	resid = (double *) R_alloc(nr * nc, sizeof(double));
     /* work array and variables for QR decomposition */
     double *qty = (double *) R_alloc(nr, sizeof(double));
-    double dummy;
+    double dummy = 0.0;
     int info, qrkind;
     /* Weighted methods currently need re-evaluation of QR
        decomposition (probably changed in the future, but now for the