Skip to content

Commit

Permalink
Update
Browse files Browse the repository at this point in the history
  • Loading branch information
marcpouzet committed Oct 30, 2024
1 parent ca32f79 commit f5c9a76
Show file tree
Hide file tree
Showing 2 changed files with 1 addition and 4 deletions.
2 changes: 1 addition & 1 deletion src/compiler/main/compiler.ml
Original file line number Diff line number Diff line change
Expand Up @@ -162,7 +162,7 @@ let compile modname filename =
let p = do_step "Mark functions calls to be inlined. See below:"
Printer.program Markfunctions.program p in

let _ = Zelus.pp_program p in
let _ = Zelus.show_program in

(* source-to-source transformations *)

Expand Down
3 changes: 0 additions & 3 deletions src/global/zelus.ml
Original file line number Diff line number Diff line change
Expand Up @@ -488,7 +488,4 @@ and ('info, 'ienv) implementation_desc =
type ('info, 'ienv) program =
{ p_impl_list : ('info, 'ienv) implementation list;
p_index : Ident.num }
[@@deriving show]

let f = show_program;;

0 comments on commit f5c9a76

Please sign in to comment.