From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 19 Sep 1994 00:14:49 +0000 (+0000)
Subject: [!MULTI_FRAME] (FOR_EACH_FRAME): Fix Lisp_Object vs. int problems.
X-Git-Tag: emacs-19.34~6954
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1bb5916bcddf016c937703af87ed180f8a70c765;p=emacs.git

[!MULTI_FRAME] (FOR_EACH_FRAME): Fix Lisp_Object vs. int problems.
---

diff --git a/src/frame.h b/src/frame.h
index d8e11ec76f6..a2d2e0e8069 100644
--- a/src/frame.h
+++ b/src/frame.h
@@ -444,7 +444,7 @@ extern EMACS_INT last_nonminibuf_frame;
    `for' loop which traverses Vframe_list using LIST_VAR and
    FRAME_VAR.  */
 #define FOR_EACH_FRAME(list_var, frame_var)			\
-  for (list_var = Qt; frame_var = selected_frame, ! NILP (list_var); list_var = Qnil)
+  for (list_var = Qt; XFASTINT (frame_var) = selected_frame, ! NILP (list_var); list_var = Qnil)
 
 #endif /* not MULTI_FRAME */