diff --git a/src/marker.c b/src/marker.c
index 35bf72873da..fbf48da1c70 100644
--- a/src/marker.c
+++ b/src/marker.c
@@ -196,7 +196,7 @@ unchain_marker (marker)
      register Lisp_Object marker;
 {
   register Lisp_Object tail, prev, next;
-  register int omark;
+  register EMACS_INT omark;
   register struct buffer *b;
 
   b = XMARKER (marker)->buffer;