From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 4 Apr 2000 21:07:45 +0000 (+0000)
Subject: (compare_window_configurations): Signal an error
X-Git-Tag: emacs-pretest-21.0.90~4325
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4d3edcb4c751613c7f0986924db91a1cf9290292;p=emacs.git

(compare_window_configurations): Signal an error
if parameters C1 or C2 aren't window configurations.
---

diff --git a/src/window.c b/src/window.c
index 8e643ee5c76..f156c469703 100644
--- a/src/window.c
+++ b/src/window.c
@@ -5081,6 +5081,11 @@ compare_window_configurations (c1, c2, ignore_positions)
   struct Lisp_Vector *sw1, *sw2;
   int i;
 
+  if (!WINDOW_CONFIGURATIONP (c1))
+    wrong_type_argument (Qwindow_configuration_p, c1);
+  if (!WINDOW_CONFIGURATIONP (c2))
+    wrong_type_argument (Qwindow_configuration_p, c2);
+  
   d1 = (struct save_window_data *) XVECTOR (c1);
   d2 = (struct save_window_data *) XVECTOR (c2);
   sw1 = XVECTOR (d1->saved_windows);