Make.IncrementalSourceval parse_script :
Lexing.position ->
([ `Invalid of string | `Malformed of string | `Valid ]
* [ `Binary of string
| `Parsed of Ast.location Ast.Text.module_
| `Text of string ])
list
MenhirInterpreter.checkpoint