Prefer 'list (...)' to 'listn (N, ...)'

* src/androidfns.c (Fandroid_query_battery):
* src/buffer.c (make_lispy_itree_node):
* src/keyboard.c (init_while_no_input_ignore_events):
* src/window.c (Fset_window_configuration):
* src/xterm.c (x_dnd_send_unsupported_drop): Prefer 'list (...)' to
'listn (N, ...)'.
* admin/coccinelle/listn.cocci: New file.

5 files changed, 36 insertions, 37 deletions

diff --git a/src/androidfns.c b/src/androidfns.c
index 9eb313faaf6..ac0f4882f60 100644
--- a/src/androidfns.c
+++ b/src/androidfns.c
@@ -3219,14 +3219,14 @@ for more details about these values.  */)
   if (android_query_battery (&state))
     return Qnil;
 
-  return listn (8, make_int (state.capacity),
-                make_fixnum (state.charge_counter),
-                make_int (state.current_average),
-                make_int (state.current_now),
-                make_fixnum (state.status),
-                make_int (state.remaining),
-                make_fixnum (state.plugged),
-                make_fixnum (state.temperature));
+  return list (make_int (state.capacity),
+               make_fixnum (state.charge_counter),
+               make_int (state.current_average),
+               make_int (state.current_now),
+               make_fixnum (state.status),
+               make_int (state.remaining),
+               make_fixnum (state.plugged),
+               make_fixnum (state.temperature));
 }
 
 
diff --git a/src/buffer.c b/src/buffer.c
index 224d56e33dd..158ebbe0c30 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -5024,19 +5024,18 @@ defvar_per_buffer (struct Lisp_Buffer_Objfwd *bo_fwd, const char *namestring,
 static Lisp_Object
 make_lispy_itree_node (const struct itree_node *node)
 {
-  return listn (12,
-                intern (":begin"),
-                make_fixnum (node->begin),
-                intern (":end"),
-                make_fixnum (node->end),
-                intern (":limit"),
-                make_fixnum (node->limit),
-                intern (":offset"),
-                make_fixnum (node->offset),
-                intern (":rear-advance"),
-                node->rear_advance ? Qt : Qnil,
-                intern (":front-advance"),
-                node->front_advance ? Qt : Qnil);
+  return list (intern (":begin"),
+               make_fixnum (node->begin),
+               intern (":end"),
+               make_fixnum (node->end),
+               intern (":limit"),
+               make_fixnum (node->limit),
+               intern (":offset"),
+               make_fixnum (node->offset),
+               intern (":rear-advance"),
+               node->rear_advance ? Qt : Qnil,
+               intern (":front-advance"),
+               node->front_advance ? Qt : Qnil);
 }
 
 static Lisp_Object
diff --git a/src/keyboard.c b/src/keyboard.c
index fa19c9f8ad3..621e6c1cafb 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -12789,10 +12789,10 @@ static const struct event_head head_table[] = {
 static Lisp_Object
 init_while_no_input_ignore_events (void)
 {
-  Lisp_Object events = listn (9, Qselect_window, Qhelp_echo, Qmove_frame,
-                              Qiconify_frame, Qmake_frame_visible,
-                              Qfocus_in, Qfocus_out, Qconfig_changed_event,
-                              Qselection_request);
+  Lisp_Object events = list (Qselect_window, Qhelp_echo, Qmove_frame,
+                             Qiconify_frame, Qmake_frame_visible,
+                             Qfocus_in, Qfocus_out, Qconfig_changed_event,
+                             Qselection_request);
 
 #ifdef HAVE_DBUS
   events = Fcons (Qdbus_event, events);
diff --git a/src/window.c b/src/window.c
index d7e6cd00c99..38f5307cb68 100644
--- a/src/window.c
+++ b/src/window.c
@@ -7664,10 +7664,10 @@ the return value is nil.  Otherwise the value is t.  */)
               w->start_at_line_beg = true;
               if (FUNCTIONP (window_restore_killed_buffer_windows)
                   && !MINI_WINDOW_P (w))
-                kept_windows = Fcons (listn (6, window, p->buffer,
-                                             Fmarker_last_position (p->start),
-                                             Fmarker_last_position (p->pointm),
-                                             p->dedicated, Qt),
+                kept_windows = Fcons (list (window, p->buffer,
+                                            Fmarker_last_position (p->start),
+                                            Fmarker_last_position (p->pointm),
+                                            p->dedicated, Qt),
                                       kept_windows);
             }
           else if (!NILP (w->start))
@@ -7689,10 +7689,10 @@ the return value is nil.  Otherwise the value is t.  */)
                 {
                   if (FUNCTIONP (window_restore_killed_buffer_windows))
                     kept_windows
-                      = Fcons (listn (6, window, p->buffer,
-                                      Fmarker_last_position (p->start),
-                                      Fmarker_last_position (p->pointm),
-                                      p->dedicated, Qnil),
+                      = Fcons (list (window, p->buffer,
+                                     Fmarker_last_position (p->start),
+                                     Fmarker_last_position (p->pointm),
+                                     p->dedicated, Qnil),
                                kept_windows);
                   else if (EQ (window_restore_killed_buffer_windows, Qdelete)
                            || (!NILP (p->dedicated)
diff --git a/src/xterm.c b/src/xterm.c
index 0692abbbb0b..43788af59d0 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -4121,10 +4121,10 @@ x_dnd_send_unsupported_drop (struct x_display_info *dpyinfo, Window target_windo
   x_dnd_unsupported_drop_time = before;
   x_dnd_unsupported_drop_window = target_window;
   x_dnd_unsupported_drop_data
-    = listn (5, assq_no_quit (QXdndSelection,
-                              dpyinfo->terminal->Vselection_alist),
-             targets, arg, make_fixnum (root_x),
-             make_fixnum (root_y));
+    = list (assq_no_quit (QXdndSelection,
+                          dpyinfo->terminal->Vselection_alist),
+            targets, arg, make_fixnum (root_x),
+            make_fixnum (root_y));
 
   x_dnd_waiting_for_finish = true;
   x_dnd_finish_display = dpyinfo->display;