Overview
| Comment: | Checks for empty args string -- returns an empty arg. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | trunk | origin/unlabeled-1.2.1 |
| Files: | files | file ages | folders |
| SHA3-256: |
71c526ef1051d558a30ab0e8f534a234 |
| User & Date: | gawthrop@users.sourceforge.net on 1996-12-05 10:04:02 |
| Other Links: | branch diff | manifest | tags |
Context
|
1996-12-05
| ||
| 10:04:02 | Checks for empty args string -- returns an empty arg. Leaf check-in: 71c526ef10 user: gawthrop@users.sourceforge.net tags: origin/unlabeled-1.2.1, trunk | |
|
1996-08-30
| ||
| 09:58:56 | Created branch unlabeled-1.2.1 check-in: 52c052eb87 user: gawthrop@users.sourceforge.net tags: origin/unlabeled-1.2.1, trunk | |
Changes
Modified mttroot/mtt/bin/trans/m/args2arg.m from [4cfa92ae45] to [b6ee5ada28].
| ︙ | ︙ | |||
12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.1 1996/08/27 12:50:43 peterg % %% Initial revision % %% % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % Field separator if nargin<3 FS = ';'; end; arg = ''; | > > > > | | | | | | | | | | | | | | | | | | > > | 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 |
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.2 1996/08/30 09:58:55 peter
% %% Uses str2ch to exteact a char from a string.
% %%
% %% Revision 1.1 1996/08/27 12:50:43 peterg
% %% Initial revision
% %%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Field separator
if nargin<3
FS = ';';
end;
arg = '';
if strcmp(args, '')==0
L = length(args);
args_count = 0;
for i=1:n
arg_count = 0;
arg = '';
if args_count == L
break;
end;
while args_count < L
args_count = args_count+1;
arg_count = arg_count+1;
ch = str2ch(args,args_count);
if ch==FS
break;
end;
arg = [arg ch];
end;
end;
end;
|