Index: mttroot/mtt/bin/trans/m/abg2cbg.m
==================================================================
--- mttroot/mtt/bin/trans/m/abg2cbg.m
+++ mttroot/mtt/bin/trans/m/abg2cbg.m
@@ -18,10 +18,13 @@
   ## ###############################################################
   ## ## Version control history
   ## ###############################################################
   ## ## $Id$
   ## ## $Log$
+  ## ## Revision 1.48  2001/07/23 23:20:27  gawthrop
+  ## ## Now only writes to type.sh and cbg.m when causality is completed.
+  ## ##
   ## ## Revision 1.47  2000/03/20 16:45:26  peterg
   ## ## *** empty log message ***
   ## ##
   ## ## Revision 1.46  2000/02/17 16:14:49  peterg
   ## ## *** empty log message ***
@@ -504,15 +507,14 @@
       mtt_info(sprintf("Component %s (%s) is overcausal", name, subsystem.type), ...
 	       infofile);
     endif;
   endfor;			# [subsystem,name] = ABG.subsystems
 
-  if (status==0)		# write out the component .cbg file
+  ## write out the component .cbg file
     disp(["Writing ", full_name]);
     write_cbg(full_name,system_type,ABG,Flipped);
     fprintf(typefile, "$1%s$2%s$3\n", system_type, full_name);
-  endif
   
 
 
   status, port_bonds
   disp("====================================");