Output.JsonSourceFormat the results of the analysis in JSON.
module AlarmKindSet : sig ... endval render_pos :
Mopsa_utils.Location.pos ->
[> `Assoc of (string * [> `Int of int | `String of string ]) list ]val render_range :
Mopsa_utils.Location.range ->
[> `Assoc of
(string
* [> `Assoc of (string * [> `Int of int | `String of string ]) list ])
list ]val render_call :
Mopsa_utils.Callstack.callsite ->
[> `Assoc of
(string
* [> `Assoc of
(string
* [> `Assoc of
(string * [> `Int of int | `String of string ]) list ])
list
| `String of string ])
list ]val render_callstack :
Mopsa_utils.Callstack.callsite list ->
[> `List of
[> `Assoc of
(string
* [> `Assoc of
(string
* [> `Assoc of
(string * [> `Int of int | `String of string ])
list ])
list
| `String of string ])
list ]
list ]val aggregate_alarms :
Core.All.report ->
(Mopsa_utils.Location.range
* Core.All.CheckMap.key
* Mopsa_utils.Callstack.callstack list)
listval render_alarms :
Core.All.report ->
int
* int
* [> `Assoc of
(string
* [> `Assoc of
(string
* [> `Assoc of
(string * [> `Int of int | `String of string ]) list ])
list
| `List of
[> `Assoc of
(string
* [> `Assoc of
(string
* [> `Assoc of
(string
* [> `Int of int | `String of string ])
list ])
list
| `String of string ])
list ]
list
| `String of string ])
list ]
listval render_soudness_assumtion :
Core.All.assumption ->
[> `Assoc of
(string
* [> `Assoc of
(string
* [> `Assoc of
(string * [> `Int of int | `String of string ]) list ])
list
| `String of string ])
list ]val render_env :
(Core.All.var * string) ->
[> `Assoc of (string * [> `String of string ]) list ]val report :
'a ->
'b Core.All.Flow.flow ->
time:float ->
files:string list ->
out:string option ->
unitval panic :
exn ->
btrace:string ->
time:float ->
files:string list ->
out:string option ->
unit