Fix rys_roots.c (issue #48)

sunqm · Nov 12, 2020 · aee731c · aee731c
1 parent 512c1b6
commit aee731c
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/rys_roots.c b/src/rys_roots.c
@@ -2147,6 +2147,7 @@ static int R_qsmit(__float128 *cs, __float128 *fmt_ints, FINT n)
  cs[k + j * MXROOTS1] = fac * v[k];
  }
  }
+ return 0;
 }
 
 static int R_qroot(FINT nroots, double x, double *roots, double *weights)