Index: mttroot/mtt/bin/trans/m/cbg2ese.m
==================================================================
--- mttroot/mtt/bin/trans/m/cbg2ese.m
+++ mttroot/mtt/bin/trans/m/cbg2ese.m
@@ -21,10 +21,13 @@
   ## ###############################################################
   ## ## Version control history
   ## ###############################################################
   ## ## $Id$
   ## ## $Log$
+  ## ## Revision 1.43  2001/11/11 08:32:00  geraint
+  ## ## fflush (structure_file).
+  ## ##
   ## ## Revision 1.42  2001/04/23 16:23:30  gawthrop
   ## ## Now stips ; from bottlom level argument list - allows aliasing of
   ## ## parts of a,b,c (eg a,b by using a,b;c
   ## ##
   ## ## Revision 1.41  2001/04/15 21:15:41  geraint
@@ -503,16 +506,16 @@
 	    	for k=1:value_change
 		  fprintf(structure_file, ...
 			  "%s\t%i\t%s\t%s_%s\t%i\n", ...
 			  structure_name(which_index,:), value-k+1, ...
 			  comp_name, full_name_repetition, comp_name, repetition);
-		  fflush (structure_file);
 	    	endfor;
  	      endfor;
  	    endif;
 	  endif
 	endfor
+	fflush (structure_file);
 
 	## component interface definition
 	if struct_contains(CBG,"icd")
 	  if struct_contains(CBG.icd,comp_name)
 	    if AliasingArguments