Skip to content

Commit 198b702

Browse files
committed
Syntax: fix ppx_js for ocaml 4.02
1 parent 4f6ecc2 commit 198b702

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

lib/ppx/ppx_js.ml

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -89,13 +89,13 @@ let inject_args args =
8989

9090
module Arg : sig
9191
type t
92-
val make : ?label:arg_label -> unit -> t
92+
val make : ?label:Label.t -> unit -> t
9393
val name : t -> string
9494
val typ : t -> core_type
95-
val label : t -> arg_label
96-
val args : t list -> (arg_label * core_type) list
95+
val label : t -> Label.t
96+
val args : t list -> (Label.t * core_type) list
9797
end = struct
98-
type arg = { label : arg_label;
98+
type arg = { label : Label.t;
9999
name : string }
100100

101101
type t = arg

0 commit comments

Comments
 (0)