diff options
| author | Brian Campbell | 2018-09-13 15:12:28 +0100 |
|---|---|---|
| committer | Brian Campbell | 2018-09-13 15:12:45 +0100 |
| commit | 61abeccf6c37169bc22a1674897caf482195857f (patch) | |
| tree | ec7c94584b50f9af3ccc27148953f291ad4e0ea6 /src | |
| parent | 3bbda62cb341cc7277fc8c70685ad7d9313e2412 (diff) | |
Coq: real built-ins for AArch64
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 |