Mercurial > hg > ltpda
view m-toolbox/classes/@ssmport/char.m @ 49:0bcdf74587d1 database-connection-manager
Cleanup
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 07 Dec 2011 17:24:36 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
% CHAR convert a ssmport object into a string. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % DESCRIPTION: CHAR convert a ssmport object into a string. % % CALL: string = char(ssmport) % % VERSION: $Id: char.m,v 1.4 2011/02/18 16:48:55 ingo Exp $ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function varargout = char(varargin) objs = varargin{1}; % see if parent block name is there if nargin==2 parentName=varargin{2}; else parentName = ''; end pstr = ''; for ii = 1:numel(objs) [blockName, portName] = ssmblock.splitName(objs(ii).name); if strcmpi(parentName, blockName) pstr = [pstr portName ' ' char(objs(ii).units) ', ']; else pstr = [pstr objs(ii).name ' ' char(objs(ii).units) ', ']; end end % remove last ', ' if length(pstr)>1 pstr = pstr(1:end-2); end %%% Prepare output varargout{1} = pstr; end