/* File: libwww.P ** Author(s): kifer ** Contact: xsb-contact@cs.sunysb.edu ** ** Copyright (C) The Research Foundation of SUNY, 1999 ** ** XSB is free software; you can redistribute it and/or modify it under the ** terms of the GNU Library General Public License as published by the Free ** Software Foundation; either version 2 of the License, or (at your option) ** any later version. ** ** XSB is distributed in the hope that it will be useful, but WITHOUT ANY ** WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS ** FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for ** more details. ** ** You should have received a copy of the GNU Library General Public License ** along with XSB; if not, write to the Free Software Foundation, ** Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. ** ** $Id: libwww.P,v 1.9 2001/07/27 03:12:42 kifer Exp $ ** */ :- import bootstrap_package/2 from packaging. :- import abort/1 from standard. :- import libwww_info/2 from libwww_init. %% bootstrap(package-dirname-as-string, package-name-as-symbol). %% This also asserts %% package_configuration(dir(PackageName), FullPackageDirname) %% some packages use it. :- export libwww_request/1. :- import do_libwww_request___/1 from libwww_request. :- bootstrap_package('libwww', libwww), ( [libwww_init], libwww_info(support, yes) -> [libwwwconfig] ; abort('The libwww package has not been configured') ). libwww_request(X) :- do_libwww_request___(X).