Skip to content

Commit f270569

Browse files
committed
fix CI
1 parent 52b1b1d commit f270569

File tree

3 files changed

+6
-6
lines changed

3 files changed

+6
-6
lines changed

jscomp/test/class_type_ffi_test.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,7 +71,7 @@ let mk_f () =
7171

7272
(* Test [fn_method] *)
7373
let omk_f ()=
74-
object[@bs]
74+
object
7575
method huge_methdo a0 a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 =
7676
a0 a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12
7777
end

jscomp/test/gpr_1600_test.ml

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@ let f : (int * int -> int [@bs]) = fun [@bs] x -> let a,b = x in a + b
66

77
let obj : < hi : (int * int -> unit [@bs.meth]) > = object
88
method hi (x : int * int) = Js.log x
9-
end [@bs]
9+
end
1010
(** expect *)
1111

1212
class type a = object
@@ -22,7 +22,7 @@ let eventObj : < currentEvents : (unit -> (string * string) array [@bs.meth]);
2222
empty : (unit -> unit [@bs.meth]);
2323
needRebuild : (unit -> bool [@bs.meth]);
2424
push : (string * string -> unit [@bs.meth]) >
25-
= object [@bs](self)
25+
= object(self)
2626
val events : (string * string) array = [||]
2727
method empty () = ()
2828
method push a = Array.unsafe_set self##events 0 a

jscomp/test/uncurry_method.ml

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11

2-
let obj = object [@bs]
2+
let obj = object
33
method hi a b = a + b
44
method say a b = a - b
55
method xx a b = a - b
@@ -38,7 +38,7 @@ let f1 (u : pro ) = u##exit ~code:2
3838
~hi:(
3939
(fun [@bs.this] _ -> fun ~name -> fun ~age -> Js.log name)
4040
) *)
41-
let obj3 = object [@bs](self)
41+
let obj3 = object (self)
4242
method hi ~(name : string) ~(age : int) = name |. Js.log
4343
method hh () = self##hi ~name:"x" ~age:20
4444
end
@@ -55,7 +55,7 @@ let obj2 : <
5555
hi : add_meth;
5656
say : add_meth;
5757
xx : add_meth
58-
> = object [@bs] (self : 'a)
58+
> = object (self : 'a)
5959
method hi a b = a + b
6060
method say a b = self##hi a b - 1
6161
method xx a b = a - b

0 commit comments

Comments
 (0)