let new_status = MatitaEngine.eval_ast status st in
let new_aliases =
match ex with
- | TA.Command (_, TA.Alias _) ->
- DisambiguateTypes.Environment.empty
+ | TA.Command (_, TA.Alias _)
+ | TA.Command (_, TA.Include _) -> DisambiguateTypes.Environment.empty
| _ -> MatitaSync.alias_diff ~from:status new_status
in
(* we remove the defined object since we consider them "automathic aliases" *)