File tree Expand file tree Collapse file tree 2 files changed +23
-1
lines changed Expand file tree Collapse file tree 2 files changed +23
-1
lines changed Original file line number Diff line number Diff line change 1
1
'use strict' ;
2
2
3
- var Mk = require ( "xx/foo_class" ) ;
3
+ var Xx$slashfoo_class = require ( "xx/foo_class" ) ;
4
+ var Mk = require ( "xx/foo_class" ) ;
4
5
5
6
function f ( ) {
6
7
return new Mk ( 3 ) ;
7
8
}
8
9
10
+ function v ( ) {
11
+ return Xx$slashfoo_class . ff ( 3 ) ;
12
+ }
13
+
9
14
exports . f = f ;
15
+ exports . v = v ;
10
16
/* xx/foo_class Not a pure module */
Original file line number Diff line number Diff line change @@ -5,3 +5,19 @@ external mk : int -> t = "xx/foo_class" [@@bs.new] [@@bs.module]
5
5
6
6
let f () =
7
7
mk 3
8
+
9
+ (*
10
+ TODO: more error checking
11
+ 1. [@@bs.module] can only be used once
12
+ 2. here [bs.new] should not have any payload
13
+ 3. consolidate all [bs.module]
14
+ external mk2 : int -> t = "xx/foo_class" [@@bs.new "x"] [@@bs.module]
15
+
16
+ let ff () =
17
+ mk2 3
18
+ *)
19
+
20
+ external ff : int -> t = " " [@@ bs.module "xx/foo_class" ]
21
+
22
+ let v () =
23
+ ff 3
You can’t perform that action at this time.
0 commit comments