24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.18 1998/07/08 11:30:45 peterg
% %% Removed second (fileID) argument from mtt_info
% %%
% %% Revision 1.17 1998/07/04 07:15:44 peterg
% %% Back under RCS
% %%
% %% Revision 1.16 1998/04/11 19:07:16 peterg
|
>
>
>
|
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.19 1998/07/08 11:33:54 peterg
% %% Replace mtt_info by mtt_error when appropriate
% %%
% %% Revision 1.18 1998/07/08 11:30:45 peterg
% %% Removed second (fileID) argument from mtt_info
% %%
% %% Revision 1.17 1998/07/04 07:15:44 peterg
% %% Back under RCS
% %%
% %% Revision 1.16 1998/04/11 19:07:16 peterg
|
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
else
effort_attribute = a(1,:);
flow_attribute = a(2,:);
end;
else # Old style file
effort_attribute = cr;
flow_attribute = args;
mtt_info(sprintf("SS component: Hmm... looks like an old-style label file"));
end;
% Default attributes
if strcmp(effort_attribute,'')
effort_attribute = 'external';
end;
|
|
|
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
else
effort_attribute = a(1,:);
flow_attribute = a(2,:);
end;
else # Old style file
effort_attribute = cr;
flow_attribute = args;
# mtt_info(sprintf("SS component: Hmm... looks like an old-style label file"));
end;
% Default attributes
if strcmp(effort_attribute,'')
effort_attribute = 'external';
end;
|