diff options
Diffstat (limited to 'src/process_file.ml')
| -rw-r--r-- | src/process_file.ml | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/process_file.ml b/src/process_file.ml index 6270cb66..8f5dec40 100644 --- a/src/process_file.ml +++ b/src/process_file.ml @@ -178,25 +178,29 @@ let output1 libpath out_arg filename defs = let ((o,_, _) as ext_o) = open_output_with_check_unformatted (f' ^ "_embedded.lem") in (Pretty_print.pp_defs_lem o defs (generated_line filename)) - ["Pervasives_extra";"Sail_impl_base";"Prompt";"Sail_values"]; + ["Pervasives_extra";"Sail_impl_base";"Prompt"; + "Sail_values";"Deep_shallow_convert"]; close_output_with_check ext_o | Lem_out (Some lib) -> let ((o,_, _) as ext_o) = open_output_with_check_unformatted (f' ^ "_embedded.lem") in (Pretty_print.pp_defs_lem o defs (generated_line filename)) - ["Pervasives_extra";"Sail_impl_base";"Prompt";"Sail_values";lib]; + ["Pervasives_extra";"Sail_impl_base";"Prompt"; + "Sail_values";"Deep_shallow_convert";lib]; close_output_with_check ext_o; | Lem_sequential_out None -> let ((o,_, _) as ext_o) = open_output_with_check_unformatted (f' ^ "_sequential_embedded.lem") in (Pretty_print.pp_defs_lem o defs (generated_line filename)) - ["Pervasives_extra";"Sail_impl_base";"State";"Sail_values"]; + ["Pervasives_extra";"Sail_impl_base";"State"; + "Sail_values";"Deep_shallow_convert"]; close_output_with_check ext_o | Lem_sequential_out (Some lib) -> let ((o,_, _) as ext_o) = open_output_with_check_unformatted (f' ^ "_sequential_embedded.lem") in (Pretty_print.pp_defs_lem o defs (generated_line filename)) - ["Pervasives_extra";"Sail_impl_base";"State";"Sail_values";lib]; + ["Pervasives_extra";"Sail_impl_base";"State"; + "Sail_values";"Deep_shallow_convert";lib]; 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 |