Overview
Comment:Replaced incorrect length(args>0) with !isempty(args)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: bf6163f8abb25b6a4b57fcce30749735d0a753484ffdb58ef87307de31ff1d7b
User & Date: gawthrop@users.sourceforge.net on 1998-08-11 14:09:05
Other Links: branch diff | manifest | tags
Context
1998-08-12
11:03:57
Initial revision check-in: a1498ac23b user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1998-08-11
14:09:05
Replaced incorrect length(args>0) with !isempty(args) check-in: bf6163f8ab user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:38:35
Zapped the obsolete args stuff check-in: 3a2581cd75 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/alias_args.m from [4293bb2400] to [fae1009da6].

1
2
3
4
5
6
7




8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
function args = alias_args(args,alias,delim,message,FileID)

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$




## Revision 1.1  1998/07/03 18:29:40  peterg
## Initial revision
##
###############################################################


  if is_struct(alias)
    if length(args>0)
      Args = split(args,delim); args="";
      [N,M]= size(Args);
      for i=1:N
        arg = deblank(Args(i,:));
        arg_ = strrep(arg,",","__");
        if struct_contains(alias,arg_)
          eval(["new_arg = alias.", arg_,";"]);







>
>
>
>







|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
function args = alias_args(args,alias,delim,message,FileID)

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.2  1998/07/27 10:24:20  peterg
## Included , in the the list of seperators (SEPS)
## This makes it substitute for bits of args separated by commas.
##
## Revision 1.1  1998/07/03 18:29:40  peterg
## Initial revision
##
###############################################################


  if is_struct(alias)
    if !isempty(args)
      Args = split(args,delim); args="";
      [N,M]= size(Args);
      for i=1:N
        arg = deblank(Args(i,:));
        arg_ = strrep(arg,",","__");
        if struct_contains(alias,arg_)
          eval(["new_arg = alias.", arg_,";"]);


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