Values.WarningsSourceval to_value :
Warning.t list ->
[> `List of
[> `Structure of
(string
* [> `List of [> `Integer of UInteger.t ] list
| `String of ErrorCode.t ])
list ]
list ]