+19

tests/SExpTest.mjs

reviewed

··· 1 1 + // Generated by ReScript, PLEASE EDIT WITH CARE 2 2 + 3 3 + import * as Test from "rescript-test/src/Test.mjs"; 4 4 + 5 5 + function intEqual(message, a, b) { 6 6 + Test.assertion(message, "Int equals", (function (a, b) { 7 7 + return a === b; 8 8 + }), a, b); 9 9 + } 10 10 + 11 11 + Test.test("add", (function () { 12 12 + intEqual(undefined, 2, 2); 13 13 + intEqual("1 + 2 === 3", 3, 3); 14 14 + })); 15 15 + 16 16 + export { 17 17 + intEqual , 18 18 + } 19 19 + /* Not a pure module */

+9

tests/SExpTest.res

reviewed

··· 1 1 + open Test 2 2 + 3 3 + let intEqual = (~message=?, a: int, b: int) => 4 4 + assertion(~message?, ~operator="Int equals", (a, b) => a === b, a, b) 5 5 + 6 6 + test("add", () => { 7 7 + intEqual(1 + 1, 2) 8 8 + intEqual(~message="1 + 2 === 3", 1 + 2, 3) 9 9 + })