@@ -15,16 +15,16 @@ module Runner: (A: Asserter) =>
1515
1616 let describe : (string , unit => unit ) => unit
1717
18- @val external beforeAll : (@ uncurry ( unit => unit ) ) => unit = "beforeAll"
18+ @val external beforeAll : (. unit => unit ) => unit = "beforeAll"
1919 let beforeAllAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
2020 let beforeAllPromise : (~timeout : int = ?, unit => promise <'a >) => unit
21- @val external beforeEach : (@ uncurry ( unit => unit ) ) => unit = "beforeEach"
21+ @val external beforeEach : (. unit => unit ) => unit = "beforeEach"
2222 let beforeEachAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
2323 let beforeEachPromise : (~timeout : int = ?, unit => promise <'a >) => unit
24- @val external afterAll : (@ uncurry ( unit => unit ) ) => unit = "afterAll"
24+ @val external afterAll : (. unit => unit ) => unit = "afterAll"
2525 let afterAllAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
2626 let afterAllPromise : (~timeout : int = ?, unit => promise <'a >) => unit
27- @val external afterEach : (@ uncurry ( unit => unit ) ) => unit = "afterEach"
27+ @val external afterEach : (. unit => unit ) => unit = "afterEach"
2828 let afterEachAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
2929 let afterEachPromise : (~timeout : int = ?, unit => promise <'a >) => unit
3030
@@ -55,16 +55,16 @@ let testAllPromise: (string, list<'a>, ~timeout: int=?, 'a => promise<assertion>
5555
5656let describe : (string , unit => unit ) => unit
5757
58- @val external beforeAll : (@ uncurry ( unit => unit ) ) => unit = "beforeAll"
58+ @val external beforeAll : (. unit => unit ) => unit = "beforeAll"
5959let beforeAllAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
6060let beforeAllPromise : (~timeout : int = ?, unit => promise <'a >) => unit
61- @val external beforeEach : (@ uncurry ( unit => unit ) ) => unit = "beforeEach"
61+ @val external beforeEach : (. unit => unit ) => unit = "beforeEach"
6262let beforeEachAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
6363let beforeEachPromise : (~timeout : int = ?, unit => promise <'a >) => unit
64- @val external afterAll : (@ uncurry ( unit => unit ) ) => unit = "afterAll"
64+ @val external afterAll : (. unit => unit ) => unit = "afterAll"
6565let afterAllAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
6666let afterAllPromise : (~timeout : int = ?, unit => promise <'a >) => unit
67- @val external afterEach : (@ uncurry ( unit => unit ) ) => unit = "afterEach"
67+ @val external afterEach : (. unit => unit ) => unit = "afterEach"
6868let afterEachAsync : (~timeout : int = ?, (unit => unit ) => unit ) => unit
6969let afterEachPromise : (~timeout : int = ?, unit => promise <'a >) => unit
7070
0 commit comments