uncomment tests

melange-community · Jun 6, 2024 · a899cf9 · a899cf9
1 parent 2a0be0c
commit a899cf9
Show file tree

Hide file tree

Showing 4 changed files with 14 additions and 14 deletions.
diff --git a/jest/__tests__/globals_test.ml b/jest/__tests__/globals_test.ml
@@ -197,7 +197,7 @@ let () =
     );
   );
 
-  (* describe "afterAllAsync" (fun () ->
+  describe "afterAllAsync" (fun () ->
     describe "without timeout" (fun () ->
       let x = ref 0 in
 
@@ -234,9 +234,9 @@ let () =
 
       test "" (fun () -> pass); (* runner will crash if there's no tests *)
     );
-  ); *)
+  );
 
-  (* describe "afterAllPromise" (fun () ->
+  describe "afterAllPromise" (fun () ->
     describe "without timeout" (fun () ->
       let x = ref 0 in
 
@@ -273,7 +273,7 @@ let () =
 
       test "" (fun () -> pass); (* runner will crash if there's no tests *)
     );
-  ); *)
+  );
 
 
   describe "afterEach" (fun () -> 

diff --git a/jest/__tests__/runner_test.ml b/jest/__tests__/runner_test.ml
@@ -192,7 +192,7 @@ let () =
     );
   );
 
-  (* describe "afterAllAsync" (fun () ->
+  describe "afterAllAsync" (fun () ->
     describe "without timeout" (fun () ->
       let x = ref 0 in
 
@@ -229,9 +229,9 @@ let () =
 
       test "" (fun () -> true); (* runner will crash if there's no tests *)
     );
-  ); *)
+  );
 
-  (* describe "afterAllPromise" (fun () ->
+  describe "afterAllPromise" (fun () ->
     describe "without timeout" (fun () ->
       let x = ref 0 in
 
@@ -268,7 +268,7 @@ let () =
 
       test "" (fun () -> true); (* runner will crash if there's no tests *)
     );
-  ); *)
+  );
 
   describe "afterEach" (fun () -> 
     let x = ref 0 in

diff --git a/jest/jest.ml b/jest/jest.ml
@@ -188,7 +188,7 @@ module Runner (A : Asserter) = struct
       (Js.Undefined.fromOption timeout)
 
   external afterAll : (unit -> unit [@mel.uncurry]) -> unit = "afterAll"
-  (* external afterAllAsync : ((unit -> unit [@u]) -> unit Js.undefined) -> int Js.Undefined.t -> unit = "afterAll"
+  external afterAllAsync : ((unit -> unit [@u]) -> unit Js.undefined) -> int Js.Undefined.t -> unit = "afterAll"
   let afterAllAsync ?timeout callback =
     afterAllAsync
       (fun finish -> callback (fun () -> finish () [@u]); Js.undefined)
@@ -197,7 +197,7 @@ module Runner (A : Asserter) = struct
   let afterAllPromise ?timeout callback =
     afterAllPromise
       (fun () -> callback () |> Js.Promise.resolve)
-      (Js.Undefined.fromOption timeout) *)
+      (Js.Undefined.fromOption timeout)
 
   external afterEach : (unit -> unit [@mel.uncurry]) -> unit = "afterEach"
   external afterEachAsync : ((unit -> unit [@u]) -> unit Js.undefined) -> int Js.Undefined.t -> unit = "afterEach"

diff --git a/jest/jest.mli b/jest/jest.mli
@@ -20,8 +20,8 @@ module Runner (A : Asserter) : sig
   val beforeEachAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
   val beforeEachPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit
   external afterAll : (unit -> unit [@mel.uncurry]) -> unit = "afterAll"
-  (* val afterAllAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit *)
-  (* val afterAllPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit *)
+  val afterAllAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
+  val afterAllPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit
   external afterEach : (unit -> unit [@mel.uncurry]) -> unit = "afterEach"
   val afterEachAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
   val afterEachPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit
@@ -57,8 +57,8 @@ external beforeEach : (unit -> unit [@mel.uncurry]) -> unit = "beforeEach"
 val beforeEachAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
 val beforeEachPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit
 external afterAll : (unit -> unit [@mel.uncurry]) -> unit = "afterAll"
-(* val afterAllAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit *)
-(* val afterAllPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit *)
+val afterAllAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
+val afterAllPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit
 external afterEach : (unit -> unit [@mel.uncurry]) -> unit = "afterEach"
 val afterEachAsync : ?timeout:int -> ((unit -> unit) -> unit) -> unit
 val afterEachPromise : ?timeout:int -> (unit -> 'a Js.Promise.t) -> unit