let d =
let config = {Y.default_config with Y.warner = new warner} in
Y.parse_document_entity config
-(*PXP (Y.ExtID (Pxp_types.System filename,
- new Pxp_reader.resolve_as_file ~url_of_id ()))
-*) (PxpUriResolver.from_file filename)
+ (Y.from_file ~alt:[PxpUrlResolver.url_resolver] filename)
Y.default_spec
in