a976c56cb9
Fix an error message broken by earlier debugging, and also fix long-standing shutdown problems. Move basic tests to more standard location.
8 lines
197 B
Racket
8 lines
197 B
Racket
#lang racket/base
|
|
(require net/url)
|
|
|
|
;; try a basic HTTPS connection:
|
|
(unless (input-port? (get-pure-port (string->url "https://api.github.com/")))
|
|
(error "failed for https://api.github.com/"))
|
|
|