one more fixup

kevinushey · kevinushey · commit ba1af9034cb0 · 2025-05-06T16:00:22.000-07:00
diff --git a/src/test-multibyte.cpp b/src/test-multibyte.cpp
@@ -59,7 +59,7 @@ extern "C" SEXP sourcetools_print_multibyte(SEXP dataSEXP)
 
     if (length == -1)
     {
-      Rf_warning("Invalid multibyte character at index %i\n", it - data);
+      Rf_warning("Invalid multibyte character at index %li\n", (long) (it - data));
       ++it;
       continue;
     }

Original file line number	Diff line number	Diff line change
`@@ -59,7 +59,7 @@ extern "C" SEXP sourcetools_print_multibyte(SEXP dataSEXP)`
`59`	`59`
`60`	`60`	`if (length == -1)`
`61`	`61`	`{`
`62`		`- Rf_warning("Invalid multibyte character at index %i\n", it - data);`
	`62`	`+ Rf_warning("Invalid multibyte character at index %li\n", (long) (it - data));`
`63`	`63`	`++it;`
`64`	`64`	`continue;`
`65`	`65`	`}`