diff --git a/src/callproc.c b/src/callproc.c
index 12621c90db5..b339f343f62 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -1477,7 +1477,7 @@ char *
 egetenv (const char *var)
 {
   char *value;
-  int valuelen;
+  ptrdiff_t valuelen;
 
   if (getenv_internal (var, strlen (var), &value, &valuelen, Qnil))
     return value;