Mercurial > hg > ltpda

view m-toolbox/classes/@repogui/getWorkspaceObjs.m @ 40:977eb37f31cb database-connection-manager

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
User friendlier errors from utils.mysql.connect
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Mon, 05 Dec 2011 18:04:03 +0100
parents f0afece42f48
children
line wrap: on
line source

% Get a list of LTPDA objects in the MATLAB workspace
%
% M Hewitson
%
% $Id: getWorkspaceObjs.m,v 1.1 2009/02/03 08:15:30 hewitson Exp $
%

function objs = getWorkspaceObjs()
  
  % get base workspace variables
  ws_vars = evalin('base','whos');
  
  objs = [];
  for j=1:length(ws_vars)
    
    cmd = sprintf('obj = evalin(''base'', ''%s'');', ws_vars(j).name);
    eval(cmd)
    if isa(obj, 'ltpda_uo')
      objs = [objs ws_vars(j)];
    end 
  end
end