File mttroot/mtt/bin/trans/strip_comments artifact 8b2e61fa07 part of check-in b0fa64f3c6

#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################


# Bourne shell script: strip_comments
# Strips comments from mtt text files
# P.J.Gawthrop July 1997
# Copyright (c) P.J.Gawthrop, 1997.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
###############################################################


sed 's/%/#/' |\
awk --field-separator '#' '{if (length($1)>0) print $1}'  |\
awk '{if (NF>0) print $0}'