Mercurial > hg > ltpda
diff m-toolbox/classes/@repogui/getWorkspaceObjs.m @ 0:f0afece42f48
Import.
| author | Daniele Nicolodi <nicolodi@science.unitn.it> |
|---|---|
| date | Wed, 23 Nov 2011 19:22:13 +0100 |
| parents | |
| children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@repogui/getWorkspaceObjs.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,22 @@ +% 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