Small program to send a debug-packet to the server.

2012-02-16 15:27:03 -05:00 · 2012-02-16 15:27:03 -05:00 · b390b9bc6f
parent f95f8c9603
commit b390b9bc6f
1 changed files with 8 additions and 0 deletions
--- a/send-signal.rkt
+++ 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) #"")