Skip to content

Commit 2946db3

Browse files
authored
Merge pull request #35 from baransu/cleanup-utils
Little cleanup after leaving example code in Utils
2 parents 3cb3b5d + 500c105 commit 2946db3

File tree

2 files changed

+1
-30
lines changed

2 files changed

+1
-30
lines changed

common/Util.bs.js

Lines changed: 1 addition & 21 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,5 @@
11

22

3-
import * as Belt_Id from "bs-platform/lib/es6/belt_Id.js";
4-
import * as Caml_obj from "bs-platform/lib/es6/caml_obj.js";
5-
import * as Belt_SetDict from "bs-platform/lib/es6/belt_SetDict.js";
63

74
function s(prim) {
85
return prim;
@@ -20,25 +17,8 @@ var ReactStuff = {
2017
Unsafe: Unsafe
2118
};
2219

23-
var cmp = Caml_obj.caml_compare;
24-
25-
var IntCmp = Belt_Id.MakeComparable({
26-
cmp: cmp
27-
});
28-
29-
var b = Belt_SetDict.fromArray(/* array */[
30-
1,
31-
2,
32-
3
33-
], IntCmp.cmp);
34-
35-
var a = Belt_SetDict.empty;
36-
3720
export {
3821
ReactStuff ,
39-
IntCmp ,
40-
a ,
41-
b ,
4222

4323
}
44-
/* IntCmp Not a pure module */
24+
/* No side effect */

common/Util.re

Lines changed: 0 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -6,12 +6,3 @@ module ReactStuff = {
66
external elementAsString: React.element => string = "%identity";
77
};
88
};
9-
10-
module IntCmp =
11-
Belt.Id.MakeComparable({
12-
type t = int;
13-
let cmp = Pervasives.compare;
14-
});
15-
16-
let a = Belt.Set.Dict.empty;
17-
let b = Belt.Set.Dict.fromArray([|1, 2, 3|], ~cmp=IntCmp.cmp);

0 commit comments

Comments
 (0)