#! /bin/bash
NAM=${1%.pas}
SRC=$NAM.pas
if fpc -gl $SRC
then
   cat $SRC > _.pas
   echo '{' >> _.pas
   if grep '#!' $SRC
   then
     cat $SRC | awk '/#!.*/,/^}.*/' | bash >> _.pas
   else
     ./$NAM >> _.pas
   fi
   echo '}' >> _.pas
   ./hilite _.pas > $SRC.html
   rm $NAM $NAM.o _.pas
else
   echo $NAM compilation failed
fi
