Don't make a library documentation prologue
[ghc-hetmet.git] / libraries / gen_contents_index
1 #!/bin/sh
2
3 set -e
4
5 HADDOCK_ARGS=
6 NAMES=
7
8 case $* in
9 --inplace)
10     GHC_PKG=../utils/ghc-pkg/ghc-pkg-inplace
11     for DIR in */
12     do
13         NAME=`echo "$DIR" | sed 's#/$##'`
14         HADDOCK_FILE=$NAME/dist/doc/html/$NAME/$NAME.haddock
15         if [ -f $HADDOCK_FILE ]
16         then
17             HADDOCK_ARGS="$HADDOCK_ARGS --read-interface=$NAME,$HADDOCK_FILE"
18             NAMES="$NAMES $NAME"
19         fi
20     done
21     ;;
22 *)
23     HADDOCK_FILES=`ls -1 */*.haddock | sort`
24     for HADDOCK_FILE in $HADDOCK_FILES
25     do
26         NAME=`echo "$HADDOCK_FILE" | sed "s#/.*##"`
27         HADDOCK_ARGS="$HADDOCK_ARGS --read-interface=$NAME,$HADDOCK_FILE"
28         NAMES="$NAMES $NAME"
29     done
30     ;;
31 esac
32
33 # Now create the combined contents and index pages
34 haddock --gen-index --gen-contents -o . \
35         -t "Haskell Hierarchical Libraries" \
36         $HADDOCK_ARGS
37
38 # Unhandled Windows help stuff?:
39
40 #libraries.HxS : libraries.txt
41 #        haddock ...
42 #               -k libraries
43 #               --html-help=mshelp2
44 #       ( cd $(HTML_DIR) && if Hxcomp -p libraries.HxC -o ../$@ ; then false ; else true ; fi ) || true
45 #
46 #libraries.chm : libraries.txt
47 #       haddock ...
48 #               -k libraries \
49 #               --html-help=mshelp \
50 #       ( cd $(HTML_DIR) && if hhc libraries.hhp ; then false ; else true ; fi && mv libraries.chm .. ) || true
51