Index: mttroot/mtt/bin/trans/sympar2global_txt2lang
==================================================================
--- mttroot/mtt/bin/trans/sympar2global_txt2lang
+++ mttroot/mtt/bin/trans/sympar2global_txt2lang
@@ -14,10 +14,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.4  1998/07/26 10:50:30  peterg
+## Corrected bug.
+##
 ## Revision 1.3  1998/07/26 10:48:18  peterg
 ## Now strips comments
 ##
 ## Revision 1.2  1998/07/25 18:49:00  peterg
 ## Now uses extended sympars -- sympar + switches
@@ -52,44 +55,43 @@
 $Lc====== Set up the global variables ======$Rc
 EOF
 # Matlab bit
 #Write out the variables in matlab global format
 if [ "$language" = "m" ]; then
-
-strip_comments <$1_sympars.txt  |\
-awk '
-BEGIN{
-  var = "foobar";
-  print "global ..."
-}
-{i++; print tolower($1), "..."; var = $1}
-END{
+ strip_comments <$1_sympars.txt  |\
+  awk '
+  BEGIN{
+    var = "foobar";
+    print "global ..."
+  }
+  {i++; print tolower($1), "..."; var = $1}
+  END{
   print var ";" # Repeat the last variable to avoid the trailing ...
-}'
-
+  }'
+exit
 fi
 
 if [ "$language" = "c" ]; then
-strip_comments <$1_sympars.txt  |\
+  strip_comments <$1_sympars.txt  |\
     awk '{
       i++; print "extern double", tolower($1) ";";
     }'
- fi
+exit
+fi
 
 if [ "$language" = "java" ]; then
 cat <<EOF
-  $1_numpar p;
-  private p = new $1_numpar();
+    $1_numpar p;
+    private p = new $1_numpar();
 EOF 
-strip_comments <$1_sympars.txt  |\
-    awk '{
-      i++; print "  float " tolower($1) " = p." tolower($1) ";";
-    }'
+  strip_comments <$1_sympars.txt  |\
+      awk '{
+        i++; print "  float " tolower($1) " = p." tolower($1) ";";
+      }'
 fi
-
 
 echo
 
 # Now invoke the standard error handling.
 # mtt_error mtt_error.txt