1 files changed, 1 insertions, 1 deletions

diff --git a/src/alloc.c b/src/alloc.c
index c50bb0f32c7..3f1ccc82a58 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -5943,7 +5943,7 @@ mark_object (Lisp_Object arg)
 #if GC_MARK_STACK
             if (ptr->area)
               {
-                Lisp_Object *p = (Lisp_Object *) ptr->data[0].pointer;
+                Lisp_Object *p = ptr->data[0].pointer;
                 ptrdiff_t nelt;
                 for (nelt = ptr->data[1].integer; nelt > 0; nelt--, p++)
                   mark_maybe_object (*p);