7 lines
166 B
Racket
7 lines
166 B
Racket
#lang web-server/insta
|
|
|
|
(define (start req)
|
|
(response 200 #"Okay" (current-seconds)
|
|
#"text/html" empty
|
|
(λ (op) (write-bytes #"PONG" op))))
|