-(* given the filename of an xml file of a cic object and it's uri, it returns *)
-(* its internal annotated representation. *)
-val annobj_of_xml : string -> UriManager.uri -> Cic.annobj
+(* given the filename of an xml file of a cic object, it returns *)
+(* its internal annotated representation. In the case of constants (whose *)
+(* type is splitted from the body), a second xml file (for the body) must be *)
+(* provided. *)
+val annobj_of_xml : string -> string option -> Cic.annobj