9 lines
183 B
Racket
9 lines
183 B
Racket
|
#lang racket/base
|
||
|
|
||
|
(require racket/udp)
|
||
|
(require "test-rrs.rkt")
|
||
|
|
||
|
(define s (udp-open-socket #f #f))
|
||
|
(define buffer (make-bytes 0))
|
||
|
(udp-send-to s "127.0.0.1" (test-port-number) #"")
|