Skip to content

Commit

Permalink
removed comment
Browse files Browse the repository at this point in the history
  • Loading branch information
lfrenot committed Dec 4, 2024
1 parent 192a5f8 commit 497db57
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/sail_lean_backend/pretty_print_lean.ml
Original file line number Diff line number Diff line change
Expand Up @@ -117,7 +117,7 @@ let rec doc_exp (E_aux (e, (l, annot)) as full_exp) =
| E_app (Id_aux (Id "internal_pick", _), _) ->
string "sorry" (* TODO replace by actual implementation of internal_pick *)
| E_internal_plet _ ->
string "sorry /- internal plet -/" (* TODO replace by actual implementation of internal_plet *)
string "sorry" (* TODO replace by actual implementation of internal_plet *)
| E_app (f, args) ->
let d_id =
if Env.is_extern f env "lean" then string (Env.get_extern f env "lean") else doc_exp (E_aux (E_id f, (l, annot)))
Expand Down

0 comments on commit 497db57

Please sign in to comment.