/*  Copyright (C) Wolfgang Menzel, Universität Hamburg, 2003-06-27
    based on the SWI-prolog demo program demo_threads.pl

    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License
    as published by the Free Software Foundation; either version 2
    of the License, or (at your option) any later version.
*/

:- module(tutor_t_server,[server/1]).

:- use_module(tutor_helper).
:- use_module(library('http/thread_httpd')).

server(Port) :-
	server(Port, []).

server(Port, Options) :-
	http_server(tutor_helper:reply,
		    [ port(Port),
		      timeout(20)
		    | Options
		    ]).

tm :-
	prolog_ide(thread_monitor).