http server test, and also unignore http client test
This commit is contained in:
8
tests-pl/issue-http_open-hanging_server.pl
Normal file
8
tests-pl/issue-http_open-hanging_server.pl
Normal file
@@ -0,0 +1,8 @@
|
||||
:- use_module(library(process)).
|
||||
:- use_module(library(http/http_server)).
|
||||
|
||||
server :-
|
||||
http_listen(8472, [get(/, hello)]).
|
||||
|
||||
hello(_Req, Res) :-
|
||||
http_body(Res, text("Ok")).
|
||||
Reference in New Issue
Block a user