Index: mttroot/mtt/bin/trans/mtt_txt2declare
==================================================================
--- mttroot/mtt/bin/trans/mtt_txt2declare
+++ mttroot/mtt/bin/trans/mtt_txt2declare
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.1  2000/10/14 09:26:48  peterg
+## Initial revision
+##
 ## Revision 1.1  2000/10/11 09:08:20  peterg
 ## Initial revision
 ##
 
 ###############################################################
@@ -34,11 +37,13 @@
 	echo Language $language not supported - sorry; exit 1
 esac
 
 case $what in
     struc)
-	strip_comments < $sys"_"$what".txt" | awk '{print $4}' >mtt_names
+	strip_comments < $sys"_"$what".txt" | awk '{if (($1=="state")||($1=="input"))
+                                                      print $4;
+                                                   }' >mtt_names
 	;;
     sympar)
       	strip_comments < $sys"_"$what".txt" | awk '{print $1}' >mtt_names
 	;;
     *)