Mercurial > hg > ltpda

view m-toolbox/classes/@repogui2/getWorkspaceObjs.m @ 10:75007001cbfe database-connection-manager

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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

% Get a list of LTPDA objects in the MATLAB workspace
%
% M Hewitson
%
% $Id: getWorkspaceObjs.m,v 1.2 2008/10/19 12:25:37 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