Prefer NILP (x) to EQ (x, Qnil)

* src/image.c (anim_prune_animation_cache):
Prefer NILP (x) to EQ (x, Qnil).
* admin/coccinelle/nilp.cocci: Semantic patch for above change.

diff --git a/admin/coccinelle/nilp.cocci b/admin/coccinelle/nilp.cocci
new file mode 100644 (file)
index 0000000..ccebbbe
--- /dev/null
+++ b/admin/coccinelle/nilp.cocci
@@ -0,0 +1,6 @@
+// Prefer NILP (x) to EQ (x, Qnil)
+@@
+expression X;
+@@
+- EQ (X, Qnil)
++ NILP (X)

diff --git a/src/image.c b/src/image.c
index f09552c40179fdb3ba6a692f46b93c998e4099d3..dea2730832b69d18d14ce2df6370f4d122dbc2e1 100644 (file)
--- a/src/image.c
+++ b/src/image.c
@@ -3561,7 +3561,7 @@ anim_prune_animation_cache (Lisp_Object clear)
     {
       struct anim_cache *cache = *pcache;
       if (EQ (clear, Qt)
-         || (EQ (clear, Qnil) && timespec_cmp (old, cache->update_time) > 0)
+         || (NILP (clear) && timespec_cmp (old, cache->update_time) > 0)
          || EQ (clear, cache->spec))
        {
          if (cache->handle)