Add t->skip and t->skipIf bindings

Author: cometkim

src/Vitest.res

@@ -1302,6 +1302,12 @@ external hasAssertion: testCtxExpect => unit = "hasAssertion"
 @inline
 let hasAssertion = testCtx => testCtx->inner->hasAssertion
 
+@send external skip: (testCtx, ~note: string=?) => unit = "skip"
+
+@send external skipIf: (testCtx, bool, ~note: string=?) => unit = "skip"
+@inline
+let skipIf = (testCtx, ~note=?, condition) => testCtx->skipIf(condition, ~note?)
+
 @scope("import.meta") @val
 external inSource: bool = "vitest"
 

tests/basic.test.res

@@ -35,3 +35,21 @@ let throwExn = () => {
 test("Exn", t => {
   t->expect(() => throwExn())->Expect.toThrowError
 })
+
+test(~skip=true, "Skip 1", t => {
+  t->expect(true)->Expect.toBeTruthy
+})
+
+test("Skip 2", t => {
+  t->skip(~note="Skipping this test")
+  t->expect(true)->Expect.toBeFalsy
+})
+
+test("Skip 3", t => {
+  t->skipIf(true)
+  t->expect(true)->Expect.toBeFalsy
+})
+
+test(~fails=true, "Fails", t => {
+  t->expect(true)->Expect.toBeFalsy
+})