type 'a start =
| Module : (Script.var option * Script.definition) start
| Script : Script.script start
| Script1 : Script.script start
exception Syntax of Source.region * string
val parse : string -> Lexing.lexbuf -> 'a start -> 'a
val string_to_script : string -> Script.script
val string_to_module : string -> Script.definition