Overview
Comment:Fixed bug for port nos. > 1 digit!
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: cdce8cf40785f22feb0bd20b329e107ad61fe0295b5ce82cc444f4f61d7a552d
User & Date: gawthrop@users.sourceforge.net on 1997-03-22 17:13:03
Other Links: branch diff | manifest | tags
Context
1997-04-09
09:26:44
Added crcopy feature to pull crs from library -- similar to copy
feature. check-in: 5cdb0ece85 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-03-22
17:13:03
Fixed bug for port nos. > 1 digit! check-in: cdce8cf407 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
17:09:11
Fixed bug in recursive cr.txt generation.
Fixed bug in recursive sympar.txt generation. check-in: efcb3a59e0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/lib/comp/simple/SS_eqn.m from [756e73c8d6] to [d65e65d140].

︙︙
15
16
17
18
19
20
21



22
23
24
25
26
27
28


			
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$



% %% Revision 1.8  1996/12/10 16:52:29  peterg
% %% Detect null string using strcmp, not length.
% %% Put filnum argument to mtt_info.
% %%
% %% Revision 1.7  1996/12/07 17:17:40  peterg
% %% Added some ;
% %%








>
>
>








15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


			
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.9  1997/03/22  15:50:59  peterg
% %% Changed %1.0f to %d format.
% %%
% %% Revision 1.8  1996/12/10 16:52:29  peterg
% %% Detect null string using strcmp, not length.
% %% Put filnum argument to mtt_info.
% %%
% %% Revision 1.7  1996/12/07 17:17:40  peterg
% %% Added some ;
% %%
︙︙
73
74
75
76
77
78
79
80

81
82
83
84
85
86
87


inputs = structure(3);
outputs = structure(4);
zero_outputs = structure(5);

if strcmp(effort_attribute, 'MTT_port') % Its a numbered port
  % Convert string to number
  port_number = abs(flow_attribute)-abs('0');


  % Effort 
  if bonds(1,1)==-1 % Source
    fprintf(filenum, '%s := %s_MTTu%d;\n', ...
        varname(name, bond_number,1), name, port_number);
  else % Sensor
    fprintf(filenum, '%s_MTTy%d := %s;\n', ...








|
>








76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91


inputs = structure(3);
outputs = structure(4);
zero_outputs = structure(5);

if strcmp(effort_attribute, 'MTT_port') % Its a numbered port
  % Convert string to number
  % port_number = abs(flow_attribute)-abs('0');
  port_number = str2num(flow_attribute);

  % Effort 
  if bonds(1,1)==-1 % Source
    fprintf(filenum, '%s := %s_MTTu%d;\n', ...
        varname(name, bond_number,1), name, port_number);
  else % Sensor
    fprintf(filenum, '%s_MTTy%d := %s;\n', ...
︙︙
154
155
156
157
158
159
160





	  varname(name, bond_number,1), zero_outputs);
    else
      mtt_info([effort_attribute, ' not appropriate for an output '], STDerr);
    end;
  end;
end;













>
>
>
>

158
159
160
161
162
163
164
165
166
167
168

	  varname(name, bond_number,1), zero_outputs);
    else
      mtt_info([effort_attribute, ' not appropriate for an output '], STDerr);
    end;
  end;
end;


structure(3) = inputs;
structure(4) = outputs;
structure(5) = zero_outputs;

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