diff options
| author | Christopher Pulte | 2015-10-20 14:28:45 +0100 |
|---|---|---|
| committer | Christopher Pulte | 2015-10-20 14:28:45 +0100 |
| commit | 68034d3ab0210076395e86dc39a4d2c3f1938868 (patch) | |
| tree | 2332da641ae9495e518433531d0345d59ece1c4b /src/process_file.ml | |
| parent | 117e58ac3da5d79dab16988b693cdd0908c0bb48 (diff) | |
| parent | 2e49ebb3b1d297e79e8415e7a9bce7d866817f98 (diff) | |
Merge branch 'master' of https://bitbucket.org/Peter_Sewell/l2
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 5b6c8ee5..443ea9b0 100644 --- a/src/process_file.ml +++ b/src/process_file.ml @@ -174,7 +174,7 @@ let output1 libpath out_arg filename defs (* alldoc_accum alldoc_inc_accum alldo end | Lem_out None -> let ((o,temp_file_name, _) as ext_o) = open_output_with_check_unformatted (f' ^ "embed.lem") in - begin Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Sail_values"]; + begin Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Sail_values";]; close_output_with_check ext_o end | Lem_out (Some lib) -> @@ -183,12 +183,12 @@ let output1 libpath out_arg filename defs (* alldoc_accum alldoc_inc_accum alldo close_output_with_check ext_o | Ocaml_out None -> let ((o,temp_file_name, _) as ext_o) = open_output_with_check_unformatted (f' ^ ".ml") in - begin Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Sail_values"]; + begin Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Big_int_Z";"Sail_values"]; close_output_with_check ext_o end | Ocaml_out (Some lib) -> let ((o,temp_file_name, _) as ext_o) = open_output_with_check_unformatted (f' ^ ".ml") in - Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Sail_values"; lib]; + Pretty_print.pp_defs_ocaml o defs (generated_line filename) ["Big_int_Z"; "Sail_values"; lib]; close_output_with_check ext_o |