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.28 1998/08/25 08:31:42 peterg +# ## Fixed bug - didn't find the ports - use deblank +# ## # ## Revision 1.27 1998/08/25 07:16:49 peterg # ## Modified to data struture representation # ## # ## Revision 1.26 1998/08/24 14:53:55 peterg # ## Uses new _cbg structure. @@ -324,14 +327,14 @@ else # its a simple component fprintf(ese_file, "\n\t%s Equations for component %s (%s), repetition %d\n\n", ... pc, comp_name, subsystem.type,k); - # Is it a named port? (Name begins with [) - Named_Port = (comp_name(1)=="["); +# # Is it a named port? (Name begins with [) +# Named_Port = (comp_name(1)=="["); - if Named_Port #Add [ to start of name + if strcmp(field,"ports") #Add [ to start of name name_r = ["[" name_r]; endif; # Save the current structure old_structure = structure;