module GP = GrafiteAstPp
module G = GrafiteAst
module H = HExtlib
-module HG = Http_getter
let floc = H.dummy_floc
Printf.fprintf och "alias id \"%s\" = \"%s\".\n\n" name uri
let check och src =
- if HG.exists ~local:false src then () else
+ if Http_getter.exists ~local:false src then () else
let msg = "UNAVAILABLE OBJECT: " ^ src in
out_line_comment och msg;
prerr_endline msg