]> matita.cs.unibo.it Git - helm.git/commitdiff
libraries-complete.ps:
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Thu, 12 Feb 2004 12:22:25 +0000 (12:22 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Thu, 12 Feb 2004 12:22:25 +0000 (12:22 +0000)
 * square nodes now have a yellow blackground
 * pxp-* packages collapsed to a single node pxp[-*]

helm/ocaml/Makefile.in

index 910e599cfaab8b6403f8e3a834b321b4a7334d48..4f745c833c9a20409766bf2441d677eb048be345 100644 (file)
@@ -73,9 +73,9 @@ METAS/META.helm-%: METAS/meta.helm-%.src
 .alldep.dot:
        echo "digraph G {" > $@
        echo "   rankdir = TB ;" >> $@
-       for i in $(MODULES); do ocamlfind query helm-$$i -recursive -p-format | sed "s/^/ \"helm-$$i\" -> \"/g" | sed "s/$$/\";/g" >> $@ ; done
+       for i in $(MODULES); do ocamlfind query helm-$$i -recursive -p-format | grep -v "pxp-" | sed "s/^pxp/pxp[-*]/g" | sed "s/^/ \"helm-$$i\" -> \"/g" | sed "s/$$/\";/g" >> $@ ; done
        mv $@ $@.old ; ./simplify_deps/simplify_deps.opt < $@.old > $@ ; rm $@.old
-       for i in $(MODULES); do echo "\"helm-$$i\" [shape=box];" >> $@ ; done
+       for i in $(MODULES); do echo "\"helm-$$i\" [shape=box,style=filled,fillcolor=yellow];" >> $@ ; done
        echo "}" >> $@