@@ -1733,31 +1733,31 @@ SEXP forderReuseSorting(SEXP DT, SEXP by, SEXP retGrpArg, SEXP retStatsArg, SEXP
17331733 opt = 2 ; // idxOpt but need to drop groups or stats
17341734 } else if (!hasGrp && retGrp && !hasStats && retStats ) {
17351735 if (verbose )
1736- Rprintf (_ ("forderReuseSorting: index found but not for retGrp and retStats: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1736+ Rprintf (_ ("forderReuseSorting: index found but not for retGrp and retStats: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17371737 } else if (!hasGrp && retGrp ) {
17381738 if (verbose )
1739- Rprintf (_ ("forderReuseSorting: index found but not for retGrp: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1739+ Rprintf (_ ("forderReuseSorting: index found but not for retGrp: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17401740 } else if (!hasStats && retStats ) {
17411741 if (verbose )
1742- Rprintf (_ ("forderReuseSorting: index found but not for retStats: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1742+ Rprintf (_ ("forderReuseSorting: index found but not for retStats: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17431743 } else {
17441744 internal_error_with_cleanup (__func__ , "reuseSorting forder index optimization unhandled branch of retGrp-retStats" ); // # nocov
17451745 }
17461746 } else {
17471747 if (!hasStats ) {
17481748 if (verbose )
1749- Rprintf (_ ("forderReuseSorting: index found but na.last=TRUE and no stats available: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1749+ Rprintf (_ ("forderReuseSorting: index found but na.last=TRUE and no stats available: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17501750 } else if (idxAnyNF (idx )) {
17511751 if (verbose )
1752- Rprintf (_ ("forderReuseSorting: index found but na.last=TRUE and NAs present: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1752+ Rprintf (_ ("forderReuseSorting: index found but na.last=TRUE and NAs present: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17531753 } else {
17541754 internal_error_with_cleanup (__func__ , "reuseSorting forder index optimization unhandled branch of last.na=T" ); // # nocov
17551755 }
17561756 }
17571757 if (opt == 2 ) {
17581758 ans = idx ;
17591759 if (verbose )
1760- Rprintf (_ ("forderReuseSorting: using existing index: %s\n" )); , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1760+ Rprintf (_ ("forderReuseSorting: using existing index: %s\n" ), CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17611761 }
17621762 }
17631763 }
@@ -1769,11 +1769,11 @@ SEXP forderReuseSorting(SEXP DT, SEXP by, SEXP retGrpArg, SEXP retStatsArg, SEXP
17691769 GetAutoIndex ()) { // disabled by default, use datatable.forder.auto.index=T to enable, do not export/document, use for debugging only
17701770 putIndex (DT , by , ans );
17711771 if (verbose )
1772- Rprintf (_ ("forderReuseSorting: setting index (retGrp=%d, retStats=%d) on DT: %s\n" )); , retGrp , retStats , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
1772+ Rprintf (_ ("forderReuseSorting: setting index (retGrp=%d, retStats=%d) on DT: %s\n" ), retGrp , retStats , CHAR (STRING_ELT (idxName (DT , by ), 0 )));
17731773 }
17741774 }
17751775 if (verbose )
1776- Rprintf (_ ("forderReuseSorting: opt=%d, took %.3fs\n" )); , opt , omp_get_wtime ()- tic );
1776+ Rprintf (_ ("forderReuseSorting: opt=%d, took %.3fs\n" ), opt , omp_get_wtime ()- tic );
17771777 UNPROTECT (protecti );
17781778 return ans ;
17791779}
0 commit comments