Mercurial > hg > ltpda

view m-toolbox/classes/@ssmblock/getPortsAtIndices.m @ 52:daf4eab1a51e database-connection-manager tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix. Default password should be [] not an empty string
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 07 Dec 2011 17:29:47 +0100 (2011-12-07)
parents f0afece42f48
children
line wrap: on
line source
% GETPORTSATINDICES get all ports at the given indices.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: GETPORTSATINDICES get all ports at the given indices.
%
% CALL:            ports = getPort(ssmblocks, indices)
%                  ports = getPort(ssmblocks, plist('indices', someIndices))
%
% VERSION:     $Id: getPortsAtIndices.m,v 1.5 2011/02/18 16:48:54 ingo Exp $
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function varargout = getPortsAtIndices(varargin)
  error('This function is deprecated and will be deleted')
  
  [objs, in_vars, rest] = utils.helper.collect_objects(varargin(:), 'ssmblock');
  [pl, in_vars, rest] = utils.helper.collect_objects(rest, 'plist');
  
  ports   = [];
  indices = [];
  
  if isa(pl, 'plist')
    indices = pl.find('indices');
  end
  for kk=1:numel(rest)
    if isnumeric(rest{kk})
      indices = rest{kk};
    end
  end
  
  for kk=1:numel(objs)
    ports   = [ports objs(kk).ports(indices(indices<=numel(objs(kk).ports)))];
  end
  
  varargout{1} = ports;
  
end