ocaml-cdp/lib/cdp_debugger_types.ml at main · ahrefs/ocaml-cdp · GitHub

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
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
(* Generated by cdp-gen from Chrome DevTools Protocol r1687809. DO NOT EDIT. *)

open Jsonkit.Primitives

module Breakpoint_id = Cdp_base.Debugger.Breakpoint_id
module Call_frame_id = Cdp_base.Debugger.Call_frame_id

type location = {
  script_id : Cdp_base.Runtime.Script_id.t; [@key "scriptId"]
  line_number : int; [@key "lineNumber"]
  column_number : int option; [@key "columnNumber"] [@option] [@json.drop_default]
}
[@@allow_extra_fields]

and script_position = {
  line_number : int; [@key "lineNumber"]
  column_number : int; [@key "columnNumber"]
}
[@@allow_extra_fields] [@@alert experimental "experimental in CDP, may change with Chrome"]

and location_range = {
  script_id : Cdp_base.Runtime.Script_id.t; [@key "scriptId"]
  start : script_position; [@key "start"]
  end_ : script_position; [@key "end"]
}
[@@allow_extra_fields] [@@alert experimental "experimental in CDP, may change with Chrome"]

and call_frame = {
  call_frame_id : Cdp_base.Debugger.Call_frame_id.t; [@key "callFrameId"]
  function_name : string; [@key "functionName"]
  function_location : location option; [@key "functionLocation"] [@option] [@json.drop_default]
  location : location; [@key "location"]
  url : string; [@key "url"]
  scope_chain : scope list; [@key "scopeChain"]
  this : Cdp_runtime_types.remote_object; [@key "this"]
  return_value : Cdp_runtime_types.remote_object option; [@key "returnValue"] [@option] [@json.drop_default]
  can_be_restarted : bool option; [@key "canBeRestarted"] [@option] [@json.drop_default]
}
[@@allow_extra_fields]

and scope_type =
  | Global [@json.name "global"]
  | Local [@json.name "local"]
  | With [@json.name "with"]
  | Closure [@json.name "closure"]
  | Catch [@json.name "catch"]
  | Block [@json.name "block"]
  | Script [@json.name "script"]
  | Eval [@json.name "eval"]
  | Module [@json.name "module"]
  | Wasm_expression_stack [@json.name "wasm-expression-stack"]
  | Other of Cdp_json.unknown [@json.catch_all]
[@@compact_variants]

and scope = {
  type_ : scope_type; [@key "type"]
  object_ : Cdp_runtime_types.remote_object; [@key "object"]
  name : string option; [@key "name"] [@option] [@json.drop_default]
  start_location : location option; [@key "startLocation"] [@option] [@json.drop_default]
  end_location : location option; [@key "endLocation"] [@option] [@json.drop_default]
}
[@@allow_extra_fields]

and search_match = {
  line_number : float; [@key "lineNumber"]
  line_content : string; [@key "lineContent"]
}
[@@allow_extra_fields]

and break_location_type =
  | DebuggerStatement [@json.name "debuggerStatement"]
  | Call [@json.name "call"]
  | Return [@json.name "return"]
  | Other of Cdp_json.unknown [@json.catch_all]
[@@compact_variants]

and break_location = {
  script_id : Cdp_base.Runtime.Script_id.t; [@key "scriptId"]
  line_number : int; [@key "lineNumber"]
  column_number : int option; [@key "columnNumber"] [@option] [@json.drop_default]
  type_ : break_location_type option; [@key "type"] [@option] [@json.drop_default]
}
[@@allow_extra_fields]

and wasm_disassembly_chunk = {
  lines : string list; [@key "lines"]
  bytecode_offsets : int list; [@key "bytecodeOffsets"]
}
[@@allow_extra_fields] [@@alert experimental "experimental in CDP, may change with Chrome"]

and script_language =
  | JavaScript [@json.name "JavaScript"]
  | WebAssembly [@json.name "WebAssembly"]
  | Other of Cdp_json.unknown [@json.catch_all]
[@@compact_variants]

and debug_symbols_type =
  | SourceMap [@json.name "SourceMap"]
  | EmbeddedDWARF [@json.name "EmbeddedDWARF"]
  | ExternalDWARF [@json.name "ExternalDWARF"]
  | Other of Cdp_json.unknown [@json.catch_all]
[@@compact_variants]

and debug_symbols = {
  type_ : debug_symbols_type; [@key "type"]
  external_url : string option; [@key "externalURL"] [@option] [@json.drop_default]
}
[@@allow_extra_fields]

and resolved_breakpoint = {
  breakpoint_id : Cdp_base.Debugger.Breakpoint_id.t; [@key "breakpointId"]
  location : location; [@key "location"]
}
[@@allow_extra_fields] [@@deriving json, show, eq]