feat: add a.pending. (#451)

This enables me to do `:1,$ s/it/penging/g` to test a single test when both
`a.it` and `it` appear in the test file.

Author: ipod825

.luacheckrc

@@ -53,6 +53,7 @@ files = {
     globals = {
       "describe",
       "it",
+      "pending",
       "before_each",
       "after_each",
     },

lua/plenary/async/init.lua

@@ -33,6 +33,7 @@ exports.tests.add_globals = function()
   a.describe = exports.tests.describe
   -- must prefix with a or stack overflow
   a.it = exports.tests.it
+  a.pending = exports.tests.pending
   a.before_each = exports.tests.before_each
   a.after_each = exports.tests.after_each
 end
@@ -46,8 +47,9 @@ exports.tests.add_to_env = function()
   env.a.describe = exports.tests.describe
   -- must prefix with a or stack overflow
   env.a.it = exports.tests.it
-  a.before_each = exports.tests.before_each
-  a.after_each = exports.tests.after_each
+  env.a.pending = exports.tests.pending
+  env.a.before_each = exports.tests.before_each
+  env.a.after_each = exports.tests.after_each
 
   setfenv(2, env)
 end

lua/plenary/async/tests.lua

@@ -10,6 +10,10 @@ M.it = function(s, async_func)
   it(s, util.will_block(async_func, tonumber(vim.env.PLENARY_TEST_TIMEOUT)))
 end
 
+M.pending = function(async_func)
+  pending(async_func)
+end
+
 M.before_each = function(async_func)
   before_each(util.will_block(async_func))
 end

tests/plenary/async/test_spec.lua

@@ -50,3 +50,9 @@ a.describe("a.after_each", function()
     assert.are.same(counter, 4)
   end)
 end)
+
+a.describe("a.pending", function()
+  a.pending("This test is disabled", function()
+    assert(false, "Should not run")
+  end)
+end)