From b390b9bc6f421bcbcf737b77f03c01d5eaf60c94 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Thu, 16 Feb 2012 15:27:03 -0500 Subject: [PATCH] Small program to send a debug-packet to the server. --- send-signal.rkt | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 send-signal.rkt diff --git a/send-signal.rkt b/send-signal.rkt new file mode 100644 index 0000000..d4dea19 --- /dev/null +++ b/send-signal.rkt @@ -0,0 +1,8 @@ +#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) #"")