view m-toolbox/classes/@ssmblock/addPorts.m @ 10:75007001cbfe database-connection-manager

Check for binary only objects
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Mon, 05 Dec 2011 16:20:06 +0100
parents f0afece42f48
children
line wrap: on
line source

% ADDPORTS adds the given ssm ports to the list of ports.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: ADDPORTS adds the given ssm ports to the list of ports.
%
% The given ports are added to the list of ports. No check is done to ensure
% the ports remain unique. Instead you should check with
% ssmblock.containsPort before adding the ports.
%
% CALL:            block = addPorts(ssmblocks, ports)
%
% VERSION:     $Id: addPorts.m,v 1.4 2011/04/08 08:56:31 hewitson Exp $
%
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function varargout = addPorts(varargin)
  warning('This function is outdated and will be deleted')
  [blocks, invars, rest] = utils.helper.collect_objects(varargin(:), 'ssmblock');
  ports = utils.helper.collect_objects(rest, 'ssmport');
  
  % copy or modify
  outblocks = copy(blocks, nargout);
  
  % loop over blocks
  for kk=1:numel(blocks)
    block = blocks(kk);
    block.ports = [block.ports copy(ports,1)];
  end
  
  if nargout > 0
    varargout{1} = outblocks;
  end
end