diff options
Diffstat (limited to 'compiler/PrePasses.ml')
| -rw-r--r-- | compiler/PrePasses.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/PrePasses.ml b/compiler/PrePasses.ml index a46ef79c..c84cd39c 100644 --- a/compiler/PrePasses.ml +++ b/compiler/PrePasses.ml @@ -446,7 +446,7 @@ let apply_passes (crate : crate) : crate = report to the user the fact that we will ignore the function body *) let fmt = Print.Crate.crate_to_fmt_env crate in let name = Print.name_to_string fmt f.name in - save_error __FILE__ __LINE__ (Some f.meta) + save_error __FILE__ __LINE__ (Some f.item_meta.meta) ("Ignoring the body of '" ^ name ^ "' because of previous error"); { f with body = None } in |