blob: 992ec29057139b2c9b1f71d2d74829c3d9e3ca12 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
open Js_of_ocaml
type to_worker = [
| `Complete of Path.Fixed.t
| `DeletePoint of (Path.Point.t * Path.Fixed.t)
]
type from_worker = [
| `Complete of Path.Fixed.t
| `Other of Js.js_string Js.t
]
|