diff options
| author | Alasdair Armstrong | 2017-11-28 19:56:25 +0000 |
|---|---|---|
| committer | Alasdair Armstrong | 2017-11-28 19:56:25 +0000 |
| commit | 4469f1295fcdf567edcc71c823fdec6a8194ca94 (patch) | |
| tree | 6f14ef4140ef0090d9186ad345ca2a22189baa22 /src/process_file.ml | |
| parent | 0952ebb7800fe1c396f6916c33bbc19a3b895308 (diff) | |
Make pretty printer able to print several internal constructs for debugging
Diffstat (limited to 'src/process_file.ml')
| -rw-r--r-- | src/process_file.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/process_file.ml b/src/process_file.ml index e4518837..92b3f328 100644 --- a/src/process_file.ml +++ b/src/process_file.ml @@ -210,7 +210,7 @@ let rewrite_step defs (name,rewriter) = | Some (f, i) -> begin let filename = f ^ "_rewrite_" ^ string_of_int i ^ "_" ^ name ^ ".sail" in - output "" Lem_ast_out [filename, defs]; + (* output "" Lem_ast_out [filename, defs]; *) let ((ot,_, _) as ext_ot) = open_output_with_check_unformatted filename in Pretty_print_sail2.pp_defs ot defs; close_output_with_check ext_ot; |