Envio de URL de raquete
Estou tentando conectar o envio de URL ao Racket (anteriormente PLT Scheme). Dei uma olhada no tutorial e na documentação do servidor. Não consigo descobrir como rotear solicitações para os mesmos servlets.
Exemplo específico:
#lang scheme (require web-server/servlet) (require web-server/dispatch) (provide/contract (start (request? . -> . response/c))) (define (start request) (blog-dispatch request)) (define-values (blog-dispatch blog-url) (dispatch-rules (("") list-posts) (("posts" (string-arg)) review-post) (("archive" (integer-arg) (integer-arg)) review-archive) (else list-posts))) (define (list-posts req) `(list-posts)) (define (review-post req p) `(review-post ,p)) (define (review-archive req y m) `(review-archive ,y ,m)) (require web-server/servlet-env) (serve/servlet start #:launch-browser? #t #:quit? #f #:listen-ip #f #:port 8080 #:extra-files-paths (list (build-path "js") (build-path "css")) #:servlet-path "")
Assumindo o código acima,localhost:8080/
vai para uma página que diz "list-posts". Indo alocalhost:8080/posts/test
vai para uma página "arquivo não encontrado" do Racket (seria de esperar que ela fosse para uma página que diz "teste de revisão e pós-teste").
Parece que estou perdendo algo pequeno e óbvio. Alguém pode me dar uma dica?