diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/pretty_print_coq.ml | 1 | ||||
| -rw-r--r-- | src/process_file.ml | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/src/pretty_print_coq.ml b/src/pretty_print_coq.ml index cc3326a5..00547db1 100644 --- a/src/pretty_print_coq.ml +++ b/src/pretty_print_coq.ml @@ -158,6 +158,7 @@ let doc_id id = string (string_id id) let doc_id_type (Id_aux(i,_)) = match i with | Id("int") -> string "Z" + | Id("real") -> string "R" | Id i -> string (fix_id false i) | DeIid x -> string (Util.zencode_string ("op " ^ x)) diff --git a/src/process_file.ml b/src/process_file.ml index f3fe2dfa..2dfd9571 100644 --- a/src/process_file.ml +++ b/src/process_file.ml @@ -327,6 +327,7 @@ let output_coq filename libs defs = "Sail2_instr_kinds"; "Sail2_values"; "Sail2_string"; + "Sail2_real"; operators_module ] @ monad_modules in |