aboutsummaryrefslogtreecommitdiff
path: root/path/wireFramePrinter.mli
blob: 72bb5b702cf5b8b235897a98bfa041f4b3acd794 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
type 'a repr 

type t = Point.t

val create_path
  : unit -> 'a repr

(* Start a new path. *)
val start
  : Point.t -> 'a repr -> 'a repr

val line_to
  : Point.t -> Point.t -> 'a repr -> 'a repr

val quadratic_to
  : Point.t -> Gg.v2 -> Gg.v2 -> Point.t -> 'a repr -> 'a repr

val stop
  : 'a repr -> 'a repr

val get 
  : 'a repr -> 'a Layer.CanvaPrinter.t