fpc/packages/libc/scripts/h2p

#!/bin/sh
f=`basename $1 .h`
sed -f h2p1.sed <$1 >$1.new
mv $1.new $1
h2pas -e -S -c -D -l libc -i -p -o $f.out $*
sed -f h2p2.sed <${f}.out >${f}h.inc
cat <<EOF >>${f}h.inc

{ ---------------------------------------------------------------------
    Borland compatibility types
  ---------------------------------------------------------------------}

// Type  
EOF
#
# end of script