jon.recoil.org / jsoo-code-mirror
this repo has no description
fork atom
jsoo-code-mirror / src / stream / stream.ml
at main 12 lines 261 B view raw
1let g = Jv.get Jv.global "__CM__stream_parser" 2 3module Language = struct 4 type t 5 6 include (Jv.Id : Jv.CONV with type t := t) 7 8 let g = Jv.get g "StreamLanguage" 9 10 let define (l : t) = 11 Jv.call g "define" [| to_jv l |] |> Code_mirror.Extension.of_jv 12end