(**************************************************************************) (* The CDuce compiler *) (* Alain Frisch and the CDuce team *) (* Copyright CNRS,INRIA, 2003,2004,2005,2006 (see LICENSE for details) *) (**************************************************************************) val is_url: string -> bool val local: string -> string -> string val url_loader: (string -> string) ref val load_url: string -> string