external get_default_tex_stylesheet_path : unit -> string
= "ml_mathml_editor_get_default_tex_stylesheet_path"
-external create :
- dictionary:[> `Document] GdomeT.t ->
- mml: [> `Document] GdomeT.t ->
- tex: [> `Document] GdomeT.t ->
+external raw_create :
+ alt_lexer:bool ->
+ dictionary_uri: string ->
+ mml_uri: string ->
+ tml_uri: string ->
log:(int -> string -> unit) ->
t
= "ml_mathml_editor_new"
+let create ?(alt_lexer=false) = raw_create ~alt_lexer
external freeze : editor:t -> bool
= "ml_mathml_editor_freeze"