-
Notifications
You must be signed in to change notification settings - Fork 350
/
Copy pathuseCallback.t
53 lines (39 loc) · 1 KB
/
useCallback.t
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
$ cat >dune-project <<EOF
> (lang dune 3.9)
> (using melange 0.1)
> EOF
$ cat >dune <<EOF
> (melange.emit
> (target js-out)
> (emit_stdlib false)
> (preprocess (pps melange.ppx))
> (libraries reason-react))
> EOF
$ cat >x.ml <<EOF
> let cb = React.useCallback0(fun a b -> a + b)
> EOF
$ dune build @melange
$ cat _build/default/js-out/x.js
// Generated by Melange
'use strict';
const React = require("react");
const cb = React.useCallback((function (a, b) {
return a + b | 0;
}), []);
exports.cb = cb;
/* cb Not a pure module */
Using an Uncurried function:
$ cat >x.ml <<EOF
> let cb = React.useCallback0(fun[@u] a b -> a + b)
> EOF
$ dune clean
$ dune build @melange
$ cat _build/default/js-out/x.js
// Generated by Melange
'use strict';
const React = require("react");
const cb = React.useCallback((function (a, b) {
return a + b | 0;
}), []);
exports.cb = cb;
/* cb Not a pure module */