summaryrefslogtreecommitdiff
path: root/src/window.c
diff options
context:
space:
mode:
authorKim F. Storm <storm@cua.dk>2006-07-12 13:22:00 +0000
committerKim F. Storm <storm@cua.dk>2006-07-12 13:22:00 +0000
commit663fbbba4d9f50656e3f278fda1f38f3eafd2339 (patch)
tree41aad98dc3e1c052afe90540685c448750a2d7b3 /src/window.c
parent47f5f6ae553af87d5d1975ae5848b98ebd422de3 (diff)
downloademacs-663fbbba4d9f50656e3f278fda1f38f3eafd2339.tar.gz
(Fwindow_configuration_frame, Fset_window_configuration):
(compare_window_configurations): Use CHECK_WINDOW_CONFIGURATION.
Diffstat (limited to 'src/window.c')
-rw-r--r--src/window.c12
1 files changed, 4 insertions, 8 deletions
diff --git a/src/window.c b/src/window.c
index c68c67c0afa..6859fc92f30 100644
--- a/src/window.c
+++ b/src/window.c
@@ -5883,8 +5883,7 @@ DEFUN ("window-configuration-frame", Fwindow_configuration_frame, Swindow_config
register struct save_window_data *data;
struct Lisp_Vector *saved_windows;
- if (! WINDOW_CONFIGURATIONP (config))
- wrong_type_argument (Qwindow_configuration_p, config);
+ CHECK_WINDOW_CONFIGURATION (config);
data = (struct save_window_data *) XVECTOR (config);
saved_windows = XVECTOR (data->saved_windows);
@@ -5909,8 +5908,7 @@ the return value is nil. Otherwise the value is t. */)
FRAME_PTR f;
int old_point = -1;
- while (!WINDOW_CONFIGURATIONP (configuration))
- wrong_type_argument (Qwindow_configuration_p, configuration);
+ CHECK_WINDOW_CONFIGURATION (configuration);
data = (struct save_window_data *) XVECTOR (configuration);
saved_windows = XVECTOR (data->saved_windows);
@@ -6949,10 +6947,8 @@ 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);
+ CHECK_WINDOW_CONFIGURATION (c1);
+ CHECK_WINDOW_CONFIGURATION (c2);
d1 = (struct save_window_data *) XVECTOR (c1);
d2 = (struct save_window_data *) XVECTOR (c2);