From 329b774e315b41bc0d5b7daf8737222768c8d1f3 Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@chimrod.com>
Date: Sat, 9 Jan 2021 11:35:40 +0100
Subject: Formalized exchanges between worker and app

---
 layer/linePrinter.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'layer/linePrinter.ml')

diff --git a/layer/linePrinter.ml b/layer/linePrinter.ml
index 38dae5c..45ee801 100755
--- a/layer/linePrinter.ml
+++ b/layer/linePrinter.ml
@@ -45,8 +45,8 @@ module Make(Repr: Repr.PRINTER) = struct
       }
 
   let quadratic_to
-    : Path.Point.t -> Gg.v2 -> Gg.v2 -> Path.Point.t -> repr -> repr
-    = fun p0 ctrl0 ctrl1 p1 { path } ->
+    : (t * Gg.v2 * Gg.v2 * t) -> repr -> repr
+    = fun (p0,  ctrl0, ctrl1, p1) { path } ->
 
       let path = Repr.move_to (Path.Point.get_coord p0) path
                  |> Repr.quadratic_to ctrl0 ctrl1 (Path.Point.get_coord p1)
-- 
cgit v1.2.3