Overview
Comment:Removed error message about through-pointing arrows
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 2ab17cafe0025c11ed93452b882124ae6eb5629da175551b28955834c6f34fb6
User & Date: gawthrop@users.sourceforge.net on 1997-12-04 14:24:22
Other Links: branch diff | manifest | tags
Context
1997-12-04
22:06:53
Added view arguments for graph plotting check-in: ab1b2fc5cb user: gawthrop@users.sourceforge.net tags: origin/master, trunk
14:24:22
Removed error message about through-pointing arrows check-in: 2ab17cafe0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:48:00
Added sign info to take account of direction of bonds. check-in: b920a2a59b user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/rbg2abg.m from [b55e532f65] to [1ee5212ade].

1
2
3
4
5
6
7




8
9
10
11
12
13
14
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18







+
+
+
+







function [bonds,components] = rbg2abg(name,rbonds,rstrokes,rcomponents,port_coord,port_name,infofile)

% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.22  1997/09/18 19:49:37  peterg
% %% Added test for uniquness of bonds on a component -- if non-unique
% %% implies same component at both ends of a bond.
% %%
% %% Revision 1.21  1997/09/16  15:14:14  peterg
% %% Added warning if a component has no bonds.
% %%
% %% Revision 1.20  1997/08/18  19:39:48  peterg
% %% Now generates (exampaded) port_bond list correctely
% %%
% %% Revision 1.19  1997/08/14  11:59:47  peterg
395
396
397
398
399
400
401
402

403
404
405
406
407
408
409
399
400
401
402
403
404
405

406
407
408
409
410
411
412
413







-
+







    %end;
    unsorted_port_list = port_list;
  end;
  
  %Two port defaults
  if (n_comp_bonds==2)&(n_unsorted_ports==0)
    if direction(1)==direction(2) % Wrong way for default
      mtt_info(['Two-port ', comp_name, ' (', comp_type, ') does not have through-pointing arrows'], infofile);
      % mtt_info(['Two-port ', comp_name, ' (', comp_type, ') does not have through-pointing arrows'], infofile);
    end;
    if direction(1)==1 %in
      % mtt_info([comp_name, ' in'],infofile);
      unsorted_port_list = ['in';'out'];
    else %reverse the order
      % mtt_info([comp_name, ' out'],infofile);
      unsorted_port_list = ['out';'in'];


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