ATDGenerated.Jsoncost_jtype loc = Jsonbug_t.loctype sub_item = Jsoncost_t.sub_item = {hash : string;loc : loc;procedure_name : string;procedure_id : string;}type json_trace_item = Jsonbug_t.json_trace_itemval equal_json_trace_item : json_trace_item -> json_trace_item -> booltype info = Jsoncost_t.info = {polynomial_version : int;polynomial : string;degree : int option;hum : hum_info;trace : json_trace_item list;}type item = Jsoncost_t.item = {hash : string;loc : loc;procedure_name : string;procedure_id : string;is_on_ui_thread : bool;exec_cost : info;}type report = Jsoncost_t.reportval string_of_sub_item : ?len:int -> sub_item -> stringSerialize a value of type sub_item into a JSON string.
val read_sub_item : Yojson.Safe.lexer_state -> Stdlib.Lexing.lexbuf -> sub_itemInput JSON data of type sub_item.
val write_json_trace_item : Stdlib.Buffer.t -> json_trace_item -> unitOutput a JSON value of type json_trace_item.
val string_of_json_trace_item : ?len:int -> json_trace_item -> stringSerialize a value of type json_trace_item into a JSON string.
val read_json_trace_item :
Yojson.Safe.lexer_state ->
Stdlib.Lexing.lexbuf ->
json_trace_itemInput JSON data of type json_trace_item.
val json_trace_item_of_string : string -> json_trace_itemDeserialize JSON data of type json_trace_item.
val string_of_hum_info : ?len:int -> hum_info -> stringSerialize a value of type hum_info into a JSON string.
val read_hum_info : Yojson.Safe.lexer_state -> Stdlib.Lexing.lexbuf -> hum_infoInput JSON data of type hum_info.
val read_info : Yojson.Safe.lexer_state -> Stdlib.Lexing.lexbuf -> infoInput JSON data of type info.
val read_item : Yojson.Safe.lexer_state -> Stdlib.Lexing.lexbuf -> itemInput JSON data of type item.
val string_of_report : ?len:int -> report -> stringSerialize a value of type report into a JSON string.