From 228eceeed40b0f86e75a394fe8d65e6e93ca2370 Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Tue, 12 Jan 2021 13:41:00 +0100 Subject: Move path, some refactoring --- script.it/worker_messages/worker_messages.ml | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'script.it/worker_messages') diff --git a/script.it/worker_messages/worker_messages.ml b/script.it/worker_messages/worker_messages.ml index b33bb23..7efd3d3 100755 --- a/script.it/worker_messages/worker_messages.ml +++ b/script.it/worker_messages/worker_messages.ml @@ -3,7 +3,14 @@ open Js_of_ocaml type to_worker = [ | `Complete of Outline.t | `DeletePoint of (Path.Point.t * Outline.t) + + (* Update the interior path *) | `Back of Outline.t + + (* Translate a path *) + | `TranslatePath of (Outline.t * Gg.v2) + + | `TranslatePoint of (Path.Point.t * Outline.t) ] type from_worker = [ -- cgit v1.2.3