···1515checks to see if x is any of the early control codes, excluding some whitespace like
16160x09 = lf
1717*)
1818-let is_C0 x = (x < 0x20 || x = 0x7f) && x!= 0x09
1818+let is_C0 x = (x < 0x20 || x = 0x7f) (*&& x!= 0x09 *)
1919and is_C1 x = 0x80 <= x && x < 0xa0
2020let is_ctrl x = is_C0 x || is_C1 x
2121and is_ascii x = x < 0x80
+4
jj_tui/lib/ansiReverse.ml
···154154 |> Base.String.Search_pattern.replace_all
155155 (Base.String.Search_pattern.create "\r")
156156 ~with_:"\n"
157157+ (*tabs cause issues too*)
158158+ |> Base.String.Search_pattern.replace_all
159159+ (Base.String.Search_pattern.create "\t")
160160+ ~with_:" "
157161 in
158162 match Parser.parse_ansi_escape_codes str with
159163 | Error a ->