diff options
| author | Alasdair Armstrong | 2018-08-07 15:47:21 +0100 |
|---|---|---|
| committer | Alasdair Armstrong | 2018-08-07 15:47:21 +0100 |
| commit | e3933fd35222995a3b44015aa288fdf34696bc8a (patch) | |
| tree | b9cf76d17b84d48be8fdbc36357f6b80b12cf32d /src/process_file.ml | |
| parent | 88fbe39a24a9432a58bc9998130f0b075344ef4c (diff) | |
Revert "Warnings: deal with all the deprecation warnings"
One day we will be free from the 4.02.3 menace, but today is not that day. :(
This should fix Sail on Jenkins
This reverts commit 86e29bcbb1597c4ef1f6cae8edbeed42f9a31414.
Diffstat (limited to 'src/process_file.ml')
| -rw-r--r-- | src/process_file.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/process_file.ml b/src/process_file.ml index 5fdd3d24..958720ea 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_ascii filename ^ "_lemmas" in + let isa_thy_name = String.capitalize 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_ascii filename); + string (" " ^ String.capitalize 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_ascii types_module :: libs)) + (o, base_imports @ (String.capitalize types_module :: libs)) defs generated_line); close_output_with_check ext_ot; close_output_with_check ext_o; |
