Overview
Comment:Copies port bonds if the port bonds ARE set
-- replaces Copies port bonds if the component bonds are NOT set
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: d61940d276064bc7b2fe47a1befb33a13861abd533b3cc84e7782a1dc32d0702
User & Date: gawthrop@users.sourceforge.net on 1998-11-20 10:52:28
Other Links: branch diff | manifest | tags
Context
1998-11-20
11:34:17
Initial revision check-in: e8af31c399 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:52:28
Copies port bonds if the port bonds ARE set
-- replaces Copies port bonds if the component bonds are NOT set
check-in: d61940d276 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:07:14
Initial revision check-in: d0a11aa4e1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/abg2cbg.m from [6774ac386d] to [d2cff795a1].

15
16
17
18
19
20
21




22
23
24
25
26
27
28
# [bonds,status] = abg2cbg(system_name, system_type, full_name, port_bonds, infofile)

# ###############################################################
# ## Version control history
# ###############################################################
# ## $Id$
# ## $Log$




# ## Revision 1.39  1998/08/25 20:06:16  peterg
# ## Writes flipped port info
# ##
# ## Revision 1.38  1998/08/25 09:15:28  peterg
# ## Fixed couple of problems with using two copies of the one data
# ## stucture:
# ##







>
>
>
>







15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
# [bonds,status] = abg2cbg(system_name, system_type, full_name, port_bonds, infofile)

# ###############################################################
# ## Version control history
# ###############################################################
# ## $Id$
# ## $Log$
# ## Revision 1.40  1998/09/02 11:47:09  peterg
# ## Now uses explicit ordered list of ports instead of port.index.
# ## Note that subsystems are still treated in arbitrary order.
# ##
# ## Revision 1.39  1998/08/25 20:06:16  peterg
# ## Writes flipped port info
# ##
# ## Revision 1.38  1998/08/25 09:15:28  peterg
# ## Fixed couple of problems with using two copies of the one data
# ## stucture:
# ##
286
287
288
289
290
291
292
293



294
295
296
297
298
299
300

# If not at top level, then copy the port bonds.
  if !at_top_level		# Find number of port bonds

    for j=1:n_ports
      jj = port_bond_index(j); # The index of the bond
      for k = 1:2
	if ABG.bonds(jj,k)==0 # only copy if not already set



	  ABG.bonds(jj,k) = port_bonds(j,k);
	endif
      endfor
    endfor
  else
    n_port_bonds=0;
  endif







|
>
>
>







290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307

# If not at top level, then copy the port bonds.
  if !at_top_level		# Find number of port bonds

    for j=1:n_ports
      jj = port_bond_index(j); # The index of the bond
      for k = 1:2
#	if ABG.bonds(jj,k)==0 # only copy if not already set
#	  ABG.bonds(jj,k) = port_bonds(j,k);
#	endif
	if port_bonds(j,k)!=0	# only copy if port bonds are set
	  ABG.bonds(jj,k) = port_bonds(j,k);
	endif
      endfor
    endfor
  else
    n_port_bonds=0;
  endif


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]