From e25b7797708c19cbaef68c14ebef8738de44c2d9 Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Wed, 30 Dec 2020 11:41:01 +0100 Subject: Refactor --- paths.ml | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'paths.ml') diff --git a/paths.ml b/paths.ml index 82eca48..49bf03a 100755 --- a/paths.ml +++ b/paths.ml @@ -1,4 +1,10 @@ (** Common module for ensuring that the function is evaluated only once *) module Path_Builder = Path.Builder.Make(Path.Point) +module Fixed = Path.Fixed.Make(Path.Point) +module SVGRepr = Path.WireFramePrinter.Make(Layer.Svg) +module SVG_Printer = Fixed.DrawFixed(SVGRepr) + +module CanvaRepr = Path.FillPrinter.Make(Layer.CanvaPrinter) +module Fixed_Printer = Fixed.DrawFixed(CanvaRepr) -- cgit v1.2.3