[fpc-pascal] index to all RTL procedures and functions

Sun May 8 21:26:46 CEST 2005

The following script generates an index to all RTL procedures and functions.
As a newbie to fpc I find this useful.  Sorry - the index is html, and is derived
from html, which is NOT the right way to do it, but I don't know latex.  The RTL
toc should be modified to include this index if it is found useful.

========================
#!/bin/ksh

(( $# > 0 )) && {
        echo
        echo "${0##*/}: create index of FPC RTL procedures and functions"
        echo
        exit
}

[[ $(id -u) != 0 ]] && {
        echo
        echo "must be root"
        echo
        exit
}

rm -f /usr/local/share/doc/fpdocs-2.0.0/rtl/rtl_pf_index.html

for f in /usr/local/share/doc/fpdocs-2.0.0/rtl/*/index-5.html
do
        [[ -f $f ]] && cat $f
done |
sed '{
        s/h1>/h2>/g
        s/\(href="\)..\//\1/
        /Overview\|#rtl/d
        /<h2>Ref/{
                s/Reference for //
                s/: P/ p/
        }
        /^<table cellpad/,/^<\/table/d
        /^<\/body/,/^<body/d
        /^<body>/a\
        <h1>Index to RTL Procedures and Functions<\h1>
}' |
sed '$a\
</body>\
</html>
' > /usr/local/share/doc/fpdocs-2.0.0/rtl/rtl_pf_index.html

========================