fixed argument passing error

markvanderloo · Jul 31, 2017 · 600e244 · 600e244
1 parent 11aa807
commit 600e244
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/pkg/NEWS b/pkg/NEWS
@@ -1,3 +1,6 @@
+version 0.9.4.6
+- Fixed argument passing error in lower_tri (thanks to Kurt Hornik)
+
 version 0.9.4.5
 - New argument 'bt' implementing Winkler's boost threshold for the Jaro-Winkler distance
 - stringdist(a,b,method="qgram") returns correct value when q>nchar(a) (or b). 

diff --git a/pkg/src/Rstringdist.c b/pkg/src/Rstringdist.c
@@ -233,7 +233,7 @@ static int get_j(R_xlen_t k, int n){
 #endif
 
 SEXP R_lower_tri(SEXP a, SEXP method
-  , SEXP weight, SEXP p, SEXP q, SEXP bt
+  , SEXP weight, SEXP p,  SEXP bt, SEXP q
   , SEXP useBytes, SEXP nthrd){
 
   int bytes = INTEGER(useBytes)[0]