From a4bf011cb08073aeb6e90f87d6b51ff7418f3359 Mon Sep 17 00:00:00 2001 From: atagen Date: Thu, 5 Dec 2024 21:26:00 +1100 Subject: [PATCH] add parsing for 90-108 bright colours --- lib/ansi.ml | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lib/ansi.ml b/lib/ansi.ml index 5038cf3..de48804 100644 --- a/lib/ansi.ml +++ b/lib/ansi.ml @@ -56,6 +56,10 @@ let parse_ansi_codes = | n when n >= 40 && n <= 47 -> (Done, parsed @ [ Bg (Intrinsic (code - 40)) ]) | 48 -> (ParsingColour ParsingBg, parsed) + | n when n >= 90 && n <= 97 -> + (Done, parsed @ [ Fg (Intrinsic (code - 82)) ]) + | n when n >= 100 && n <= 107 -> + (Done, parsed @ [ Bg (Intrinsic (code - 92)) ]) | _ -> (Done, parsed @ [ Other code ]) in let waste_state p =