Use first type module instead of functors

1 files changed, 7 insertions, 7 deletions

diff --git a/path/wireFramePrinter.mli b/path/wireFramePrinter.mli
index d6f346e..1e76120 100755
--- a/path/wireFramePrinter.mli
+++ b/path/wireFramePrinter.mli
@@ -1,26 +1,26 @@
 module Make(Repr:Layer.Repr.PRINTER): sig
 
-  type 'a repr 
+  type repr 
 
   type t = Point.t
 
   val create_path
-    : 'b -> 'a repr
+    : 'b -> repr
 
   (* Start a new path. *)
   val start
-    : Point.t -> 'a repr -> 'a repr
+    : Point.t -> repr -> repr
 
   val line_to
-    : Point.t -> Point.t -> 'a repr -> 'a repr
+    : Point.t -> Point.t -> repr -> repr
 
   val quadratic_to
-    : Point.t -> Gg.v2 -> Gg.v2 -> Point.t -> 'a repr -> 'a repr
+    : Point.t -> Gg.v2 -> Gg.v2 -> Point.t -> repr -> repr
 
   val stop
-    : 'a repr -> 'a repr
+    : repr -> repr
 
   val get 
-    : 'a repr -> 'a Repr.t
+    : repr -> Repr.t
 
 end