clean up interfaces

lib/ansi.mli

@@ -0,0 +1 @@
+val ansi_parse : Types.chunk Angstrom.t

lib/emitter.mli

@@ -1,5 +1,4 @@
-type serialiser = { mutable buf : string; sz : int; mutable pos : int; }
+type serialiser = { mutable buf : bytes; mutable pos : int; }
 val flush : serialiser -> unit
 val serialise : serialiser -> Types.chunk -> unit
 val create : serialiser
-val print_debug : serialiser -> unit

lib/env.mli

@@ -0,0 +1,2 @@
+val colours : Types.colour array
+val order : int array

lib/parse.mli

@@ -1,2 +1,3 @@
 val culr_parse : Types.chunk Angstrom.t
-val debug_print : Types.chunk -> unit
+val parse_env_colours : string -> Types.colour array
+val parse_env_order : string -> int array

lib/pipes.mli

@@ -1 +0,0 @@
-val read_all : unit -> unit

lib/types.mli

@@ -1,12 +0,0 @@
-type colour =
-  | Intrinsic of int (* _0-_7 *)
-  | Simple of int (* _8;5;n *)
-  | RGB of int * int * int (* _8;2;r;g;b *)
-
-type ansi_gfx = Bg of colour | Fg of colour | Reset | Other of int
-
-type chunk =
-  | Text of string
-  | Separator of string
-  | Delimiter of string
-  | Ansi of ansi_gfx list