# Copyright (c) P.J.Gawthrop 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.2  1998/07/16 16:34:09  peterg
## Cosmetic changes
##
## Revision 1.1  1998/07/16 16:31:47  peterg
## Initial revision
##
###############################################################


# Inform user

    grep '[%|#]DESCRIPTION' $1_lbl.txt | sed 's/_/\\_/g'  |\
    awk '{
           for (i=2;i<=NF;i++) print $i " ";
         }' >> $1_lbl.tex

#Write out the aliases
cat <<EOF >> $1_lbl.tex
\paragraph{Interface information}
\paragraph{Interface information:}
\begin{description}
EOF
    grep '[%|#]ALIAS' $1_lbl.txt | sed 's/_/\\_/g' |\
    awk '{
      if (match($2,"\\$")>0){
        print "\\item [Parameter \\" $2 "] represents " $3
        print "\\item [Parameter \\" $2 "] represents actual parameter \\textbf{" $3 "}"
      }
      else{
        print "\\item [Port " $2 "] represents actual port " $3 "" 
        print "\\item [Port " $2 "] represents actual port \\textbf{" $3 "}"
      }
     }
    END{if (NR==0) print "\\item This component has no aliases"
}'  | sort >> $1_lbl.tex
cat <<EOF >> $1_lbl.tex
\end{description}
EOF