Source file parsetree_show.ml
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
module%override Lexing = struct
type position = _ [@@deriving show]
end
module%override Longident = struct
[%%types] [@@deriving show]
end
module%override Location = struct
[%%types] [@@deriving show]
end
module%override Asttypes = struct
[%%types] [@@deriving show]
end
module%override Parsetree = struct
[%%types] [@@deriving show]
end