Removal or commenting of unused code

This commit is contained in:
John Whitington
2024-02-23 16:17:12 +00:00
parent e305db72f5
commit 24c8b63808
15 changed files with 19 additions and 245 deletions

View File

@ -111,11 +111,6 @@ let contents_of_file filename =
s
(* Platform-independent current time and date with no Unix module *)
let debug_str s =
for x = 0 to String.length s - 1 do
Printf.printf "%i\t%C\n" x s.[x]
done
let utf8_of_utf16le s =
implode (drop_evens (tl (tl (explode s))))