Mercurial > emacs

diff src/marker.c @ 71840:96e9b3cb9809

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fcopy_marker): Use CHECK_TYPE.
author Kim F. Storm <storm@cua.dk>
date Wed, 12 Jul 2006 13:19:54 +0000
parents 3bd95f4f2941
children b7e16dcc0668 8a8e69664178
line wrap: on
line diff
--- a/src/marker.c	Wed Jul 12 13:19:42 2006 +0000
+++ b/src/marker.c	Wed Jul 12 13:19:54 2006 +0000
@@ -835,8 +835,7 @@
 {
   register Lisp_Object new;
 
-  if (! (INTEGERP (marker) || MARKERP (marker)))
-    marker = wrong_type_argument (Qinteger_or_marker_p, marker);
+  CHECK_TYPE (INTEGERP (marker) || MARKERP (marker), Qinteger_or_marker_p, marker);
 
   new = Fmake_marker ();
   Fset_marker (new, marker,