atagen/culr
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

support colour reinsert after resets, switch to intrinsics by default

Browse source
This commit is contained in:
atagen 2024-12-05 22:19:43 +11:00
parent a4bf011cb0
commit 7146615e04
6 changed files with 54 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/pipes.ml
View file

@ -6,7 +6,7 @@ let read_all colours =
let t = Emitter.create and culr = Culriser.create colours in
Emitter.serialise t (Ansi [ Fg (Culriser.next culr) ]);
Angstrom_unix.parse_many ~buf_size:4096 Parse.culr_parse
(fun c -> c |> ansi_filter |> Culriser.serialise_with_colour culr t)
(fun c -> c |> ansi_filter culr |> Culriser.serialise_with_colour culr t)
stdin
|> function
| _, Ok _ -> Emitter.flush t