Add cast.

kalibera · kalibera · commit 488ac493c431 · 2025-07-10T10:42:34.000Z
git-svn-id: https://svn.r-project.org/R/trunk@88394 00db46b3-68df-0310-9c12-caf00c1e9a41
diff --git a/src/modules/internet/libcurl.c b/src/modules/internet/libcurl.c
@@ -406,7 +406,7 @@ in_do_curlGetHeaders(SEXP call, SEXP op, SEXP args, SEXP rho)
     curl_easy_setopt(hnd, CURLOPT_WRITEFUNCTION, &rcvBody);
     curlCommon(hnd, redirect, verify);
     if (timeout > 0) {
-	curl_easy_setopt(hnd, CURLOPT_TIMEOUT, timeout);
+	curl_easy_setopt(hnd, CURLOPT_TIMEOUT, (long)timeout);
 	current_timeout = timeout;
     }
     if (!streql(TLS, "")) {

Original file line number	Diff line number	Diff line change
`@@ -406,7 +406,7 @@ in_do_curlGetHeaders(SEXP call, SEXP op, SEXP args, SEXP rho)`
`406`	`406`	`curl_easy_setopt(hnd, CURLOPT_WRITEFUNCTION, &rcvBody);`
`407`	`407`	`curlCommon(hnd, redirect, verify);`
`408`	`408`	`if (timeout > 0) {`
`409`		`- curl_easy_setopt(hnd, CURLOPT_TIMEOUT, timeout);`
	`409`	`+ curl_easy_setopt(hnd, CURLOPT_TIMEOUT, (long)timeout);`
`410`	`410`	`current_timeout = timeout;`
`411`	`411`	`}`
`412`	`412`	`if (!streql(TLS, "")) {`