Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Constructing a Uri supports #f for the port.

  • Loading branch information...
commit f0894647f76565cc63b54ec6b5ee359d5486c540 1 parent ad25760
@RayRacine authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  httpclient/uri.rkt
2  httpclient/uri.rkt
@@ -77,7 +77,7 @@
(with-syntax ([ch (datum->syntax stx 'ch )])
#'(read-valid ip (λ: ((ch : Char)) until-block) op))]))
-(: make-uri (String (Option String) String Natural String (Option String) (Option String) -> Uri))
+(: make-uri (String (Option String) String (Option Natural) String (Option String) (Option String) -> Uri))
(define (make-uri scheme user host port path query fragment)
(let ((authority (Authority user host port)))
(Uri scheme authority
Please sign in to comment.
Something went wrong with that request. Please try again.