Use XCAR and XCDR instead of Fcar and Fcdr where possible.

* admin/coccinelle/list_loop.cocci: Semantic patch to convert from Fcdr
to XCDR and consistently use CONSP in the list iteration loops.
* admin/coccinelle/vector_contents.cocci: Fix indentation.
* src/callint.c, src/coding.c, src/doc.c, src/editfns.c, src/eval.c,
* src/font.c, src/fontset.c, src/frame.c, src/gnutls.c, src/minibuf.c,
* src/msdos.c, src/textprop.c, src/w32fns.c, src/w32menu.c, src/window.c,
* src/xmenu.c: Changed to use XCAR and XCDR where argument type is known
to be a Lisp_Cons.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/callint.c b/src/callint.c
index 1a99ca2731c..58e1a5be2f4 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -205,7 +205,7 @@ fix_command (Lisp_Object input, Lisp_Object values)
               if (CONSP (elt))
                 {
                   Lisp_Object presflag, carelt;
-                  carelt = Fcar (elt);
+                  carelt = XCAR (elt);
                   /* If it is (if X Y), look at Y.  */
                   if (EQ (carelt, Qif)
                       && EQ (Fnthcdr (make_number (3), elt), Qnil))