Factor out some new libraries

	word64-map:
		Data.Word64Map
	network-addr:
		Network.Address
	tox-crypto:
		Crypto.Tox
	lifted-concurrent:
		Control.Concurrent.Lifted.Instrument
		Control.Concurrent.Async.Lifted.Instrument
	psq-wrap:
		Data.Wrapper.PSQInt
		Data.Wrapper.PSQ
	minmax-psq:
		Data.MinMaxPSQ
        tasks:
                Control.Concurrent.Tasks
	kad:
		Network.Kademlia
		Network.Kademlia.Bootstrap
		Network.Kademlia.Routing
		Network.Kademlia.CommonAPI
		Network.Kademlia.Persistence
		Network.Kademlia.Search

1 files changed, 19 insertions, 0 deletions

diff --git a/dht/graphdeps b/dht/graphdeps
new file mode 100755
index 00000000..4ee6939a
--- /dev/null
+++ b/dht/graphdeps
@@ -0,0 +1,19 @@
+#!/bin/bash
+
+args="-r Todo"
+
+graphmod $args "$@"         \
+          -i . -i Presence  \
+          Presence/main.hs  \
+ | awk 'BEGIN{n=1;}
+        !/label="Main"/{print;}
+        /label="Main"/{if(n==1) print;n=n+1;}' \
+   | sed '2isize="13,8!"; ratio=fill;' \
+ > modules.dot
+
+fgnode="$(sed -n '/label="FGConsole"/{s#\(.*\)\[.*#\1#; p}' modules.dot)"
+
+cat modules.dot | sed '3'i$fgnode'->monitortty;\
+monitortty[label="monitortty.c"];' | dot -Tsvg > modules.svg
+
+