(function
| GrafiteAst.Ident_alias (_, suri) ->
let buri = UriManager.buri_of_uri (UriManager.uri_of_string suri) in
- Some (GrafiteAst.Dependency buri)
+ Some (LibraryNoDb.Dependency buri)
| _ -> None)
in
let aliases =
DisambiguatePp.aliases_of_domain_and_codomain_items_list new_aliases
in
let status = add_moo_content (commands_of_aliases aliases) new_status in
- let status = add_moo_metadata (deps_of_aliases aliases) status in
+ let status = add_metadata (deps_of_aliases aliases) status in
status
(** given a uri and a type list (the contructors types) builds a list of pairs