Overview
| Comment: | No change |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
0fd5e62a2437b3e1fd8b808ec011a5ee |
| User & Date: | gawthrop@users.sourceforge.net on 1998-07-27 09:53:44.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-07-27
| ||
| 10:24:20 |
Included , in the the list of seperators (SEPS) This makes it substitute for bits of args separated by commas. check-in: 8be6c3ee23 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 09:53:44 | No change check-in: 0fd5e62a24 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 08:38:11 | Just look for / in the relevant field. check-in: 4709317c6a user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/m/subs_arg.m
from [bf507a7396]
to [fbd7f5c78b].
| ︙ | ︙ | |||
13 14 15 16 17 18 19 20 21 22 23 24 25 26 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.4 1996/12/10 16:04:11 peterg % %% Changed file handling on mtt_info. % %% % %% Revision 1.3 1996/12/07 18:19:39 peterg % %% Replaces null argument by a default and tells user. % %% % %% Revision 1.2 1996/12/04 21:47:41 peterg | > > > | 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.5 1998/07/21 16:43:26 peterg % %% Now writes to an explicit fileID - otherwise we may run out of IDs. % %% % %% Revision 1.4 1996/12/10 16:04:11 peterg % %% Changed file handling on mtt_info. % %% % %% Revision 1.3 1996/12/07 18:19:39 peterg % %% Replaces null argument by a default and tells user. % %% % %% Revision 1.2 1996/12/04 21:47:41 peterg |
| ︙ | ︙ | |||
54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 |
args_count = args_count+1;
break
end;
args_count = args_count+1;
ch = str2ch(args,args_count);
end;
arg_out = args2arg(Args,i);
% Test for empty argument -- replace by default and tell user
message = 'Argument %1.0f of component %s(%s) of system %s is undefined - \n replacing by %s';
if strcmp(arg_out,'')
info = sprintf(message, ...
i, comp_name, comp_type, full_name, default);
arg_out = default;
else
info = sprintf("Replacing $%i \t by %s for component %s (%s) \
within %s", i, arg_out, comp_name, comp_type, full_name);
end;
mtt_info(info,fileID);
args_out = [args_out, arg_out];
end;
end;
end;
| > < < < < < < | 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 |
args_count = args_count+1;
break
end;
args_count = args_count+1;
ch = str2ch(args,args_count);
end;
arg_out = args2arg(Args,i);
% Test for empty argument -- replace by default and tell user
message = 'Argument %1.0f of component %s(%s) of system %s is undefined - \n replacing by %s';
if strcmp(arg_out,'')
info = sprintf(message, ...
i, comp_name, comp_type, full_name, default);
arg_out = default;
else
info = sprintf("Replacing $%i \t by %s for component %s (%s) \
within %s", i, arg_out, comp_name, comp_type, full_name);
end;
mtt_info(info,fileID);
args_out = [args_out, arg_out];
end;
end;
end;
|