Noddy driver for ease of repeatable runs
This commit is contained in:
parent
024b6b75cc
commit
a50b9a594c
|
@ -0,0 +1,16 @@
|
||||||
|
#!/bin/sh
|
||||||
|
racket new-server.rkt > drive-output.$(date '+%Y%m%d%H%M%S').txt 2>&1 &
|
||||||
|
serverpid=$!
|
||||||
|
echo "Serverpid is $serverpid"
|
||||||
|
while true
|
||||||
|
do
|
||||||
|
if netstat -an | grep -q '2322.*LISTEN'
|
||||||
|
then
|
||||||
|
break
|
||||||
|
fi
|
||||||
|
sleep 0.1
|
||||||
|
done
|
||||||
|
echo '(+ 1 2 3 4 5 6)' | ssh localhost -p 2322
|
||||||
|
sleep 1
|
||||||
|
kill -INT $serverpid
|
||||||
|
echo "Killed $serverpid"
|
Loading…
Reference in New Issue