X-Git-Url: https://mattmccutchen.net/match/match.git/blobdiff_plain/9ecd6424ffbf1305e7344b99517c4fbb04b26df2..2e7d542623d17554667ca0199dd988caf3c442ae:/program/show-graph

diff --git a/program/show-graph b/program/show-graph
new file mode 100755
index 0000000..09133e5
--- /dev/null
+++ b/program/show-graph
@@ -0,0 +1,6 @@
+#!/bin/bash
+set -e
+echo "Paste the escaped graphviz string from ghci."
+IFS='' read -r egvinput
+eval "echo \$'$egvinput'" | dot -Tps -o thegraph.ps
+go thegraph.ps