Warnings: deal with all the deprecation warnings

Changes are:

- String.capitalize -> String.capitalize_ascii
- String.uppercase  -> String.uppercase_ascii
- String.lowercase  -> String.lowercase_ascii

Basically just making the change that the warning message suggested.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/process_file.ml b/src/process_file.ml
index 958720ea..5fdd3d24 100644
--- a/src/process_file.ml
+++ b/src/process_file.ml
@@ -271,14 +271,14 @@ let output_lem filename libs defs =
       operators_module
     ] @ monad_modules
   in
-  let isa_thy_name = String.capitalize filename ^ "_lemmas" in
+  let isa_thy_name = String.capitalize_ascii filename ^ "_lemmas" in
   let isa_lemmas =
     separate hardline [
       string ("theory " ^ isa_thy_name);
       string  "  imports";
       string  "    Sail.Sail2_values_lemmas";
       string  "    Sail.Sail2_state_lemmas";
-      string ("    " ^ String.capitalize filename);
+      string ("    " ^ String.capitalize_ascii filename);
       string  "begin";
       string  "";
       State.generate_isa_lemmas !Pretty_print_lem.opt_mwords defs;
@@ -292,7 +292,7 @@ let output_lem filename libs defs =
     open_output_with_check_unformatted (filename ^ ".lem") in
   (Pretty_print.pp_defs_lem
      (ot, base_imports)
-     (o, base_imports @ (String.capitalize types_module :: libs))
+     (o, base_imports @ (String.capitalize_ascii types_module :: libs))
      defs generated_line);
   close_output_with_check ext_ot;
   close_output_with_check ext_o;