remove functions unsupported by rescript 10 (#141)

src/Reprocessing_Common.re

@@ -179,23 +179,6 @@ module Stream = {
   let create = (str: string) : t => (str, 0);
 };
 
-let read = (name: string) => {
-  let ic = open_in(name);
-  let try_read = () =>
-    switch (input_line(ic)) {
-    | exception End_of_file => None
-    | x => Some(x)
-    };
-  let rec loop = (acc) =>
-    switch (try_read()) {
-    | Some(s) => loop([String.make(1, '\n'), s, ...acc])
-    | None =>
-      close_in(ic);
-      List.rev(acc)
-    };
-  loop([]) |> String.concat("")
-};
-
 let append_char = (s: string, c: char) : string => s ++ String.make(1, c);
 
 let rec split = (stream, sep, accstr, acc) =>

src/Reprocessing_Font.re

@@ -84,7 +84,7 @@ module Font = {
     if (num < 0) {
       (stream, map);
     } else if (Stream.peekn(stream, 4) != Some("char")) {
-      prerr_string(
+      print_string(
         "Warning: encountered end of char sequence early when loading font.\n"
       );
       (stream, map);