Skip to content

Commit

Permalink
typo
Browse files Browse the repository at this point in the history
  • Loading branch information
msprotz committed Jul 19, 2023
1 parent ae10162 commit d33a017
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Structs.ml
Original file line number Diff line number Diff line change
Expand Up @@ -345,7 +345,7 @@ let check_for_illegal_copies files =
self#visit_expr_w () e3

method! visit_ELet _ b e1 e2 =
if should_rewrite b.typ = NoCopies && e2.node <> EAny then
if should_rewrite b.typ = NoCopies && e1.node <> EAny then
Warn.fatal_error "The let-binding let %s = %a creates a copy of a type that \
should not be copied (namely, %a) -- please rewrite your \
code\n%s"
Expand Down

0 comments on commit d33a017

Please sign in to comment.