(buffer-swapped-with): Mark as permanent local.
[bpt/emacs.git] / lwlib / lwlib-utils.c
index cd7c9c5..dbdaf3c 100644 (file)
@@ -1,22 +1,24 @@
 /* Defines some widget utility functions.
-   Copyright (C) 1992 Lucid, Inc.
+Copyright (C) 1992 Lucid, Inc.
+Copyright (C) 1994, 2001, 2002, 2003, 2004, 2005, 2006,
+  2007, 2008, 2009 Free Software Foundation, Inc.
 
 This file is part of the Lucid Widget Library.
 
-The Lucid Widget Library is free software; you can redistribute it and/or 
+The Lucid Widget Library is free software; you can redistribute it and/or
 modify it under the terms of the GNU General Public License as published by
 the Free Software Foundation; either version 1, or (at your option)
 any later version.
 
 The Lucid Widget Library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of 
+but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
 along with GNU Emacs; see the file COPYING.  If not, write to
-the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-Boston, MA 02111-1307, USA.  */
+the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+Boston, MA 02110-1301, USA.  */
 
 #ifdef HAVE_CONFIG_H
 #include <config.h>
@@ -29,10 +31,13 @@ Boston, MA 02111-1307, USA.  */
 #undef index
 #undef rindex
 
+#include "../src/lisp.h"
+
 #include <X11/Xatom.h>
 #include <X11/IntrinsicP.h>
 #include <X11/ObjectP.h>
 #include "lwlib-utils.h"
+#include "lwlib.h"
 
 /* Redisplay the contents of the widget, without first clearing it. */
 void
@@ -57,7 +62,7 @@ XtNoClearRefreshWidget (widget)
 }
 
 
-/* 
+/*
  * Apply a function to all the subwidgets of a given widget recursively.
 */
 void
@@ -75,7 +80,8 @@ XtApplyToWidgets (w, proc, arg)
       int nkids = cw->composite.num_children;
       Widget *kids = (Widget *) malloc (sizeof (Widget) * nkids);
       int i;
-      lwlib_bcopy (cw->composite.children, kids, sizeof (Widget) * nkids);
+      lwlib_bcopy ((char *) cw->composite.children, (char *) kids,
+                  sizeof (Widget) * nkids);
       for (i = 0; i < nkids; i++)
 /* This prevent us from using gadgets, why is it here? */
 /*     if (XtIsWidget (kids [i])) */
@@ -173,8 +179,11 @@ XtSafelyDestroyWidget (widget)
     }
   else
     XtDestroyWidget (widget);
-  
+
 #else
   abort ();
 #endif
 }
+
+/* arch-tag: f21f0a1f-2a4e-44e1-8715-7f234fe2d159
+   (do not change this comment) */