From d79bc199b3e5a11046ad76edc8749ea182c76f9d Mon Sep 17 00:00:00 2001 From: matteob8 Date: Mon, 21 Apr 2025 19:13:20 +0200 Subject: [PATCH] Update http_server.pl Avoid overwriting of predicate and made explicit reference to the loading of library(http/http_server). --- src/lib/http/http_server.pl | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/src/lib/http/http_server.pl b/src/lib/http/http_server.pl index 4c22e497..1fd67b1a 100644 --- a/src/lib/http/http_server.pl +++ b/src/lib/http/http_server.pl @@ -17,6 +17,8 @@ as one HTTP method (in lowercase) and followed by a Route Match and a predicate which will handle the call. ``` +:- use_module(library(http/http_server)). + text_handler(Request, Response) :- http_status_code(Response, 200), http_body(Response, text("Welcome to Scryer Prolog!")). @@ -24,10 +26,11 @@ text_handler(Request, Response) :- parameter_handler(User, Request, Response) :- http_body(Response, text(User)). -http_listen(7890, [ - get(echo, text_handler), % GET /echo - post(user/User, parameter_handler(User)) % POST /user/ -]). +top:- + http_listen(7890, [ + get(echo, text_handler), % GET /echo + post(user/User, parameter_handler(User)) % POST /user/ + ]). ``` Every handler predicate will have at least 2-arity, with Request and Response. -- 2.54.0