# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 970577195 0
# Node ID 31541e0a27042cdb03f04714d025fbe95a5ac27a
# Parent  a9ddd9042aff009ef9dfe8739bf71897ab7fb45d
(Fgarbage_collect): Prevent compiler warning for a call
to `mark_object'.

diff -r a9ddd9042aff -r 31541e0a2704 src/alloc.c
--- a/src/alloc.c	Tue Oct 03 12:34:56 2000 +0000
+++ b/src/alloc.c	Tue Oct 03 12:46:35 2000 +0000
@@ -3600,7 +3600,9 @@
     for (i = 0; i < tail->nvars; i++)
       if (!XMARKBIT (tail->var[i]))
 	{
-	  mark_object (&tail->var[i]);
+	  /* Explicit casting prevents compiler warning about
+	     discarding the `volatile' qualifier.  */
+	  mark_object ((Lisp_Object *)&tail->var[i]);
 	  XMARK (tail->var[i]);
 	}
 #endif