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