1/*  $Id$
2
3    Part of SWI-Prolog
4
5    Author:  Jan Wielemaker
6    E-mail:  jan@swi.psy.uva.nl
7    WWW:     http://www.swi.psy.uva.nl/projects/SWI-Prolog/
8    Copying: GPL-2.  See the file COPYING or http://www.gnu.org
9
10    Copyright (C) 1990-2001 SWI, University of Amsterdam. All rights reserved.
11*/
12
13:- load_files([ demo_body,
14		library('http/thread_httpd')
15	      ],
16	      [ silent(true)
17	      ]).
18
19server :-
20	server(3000, []).
21
22server(Port, Options) :-
23	http_server(reply,
24		    [ port(Port),
25		      timeout(20)
26		    | Options
27		    ]).
28
29tm :-
30	prolog_ide(thread_monitor).
31