Mercurial > hg > ltpda
view m-toolbox/classes/+utils/@helper/isSubclassOf.m @ 7:1e91f84a4be8 database-connection-manager
Make ltpda_up.retrieve work with java.sql.Connection 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
% ISSUBCLASSOF determines if the one class is a subclass of another % % CALL: % res = isSubclassOf('class1', 'class2') % res = isSubclassOf(metaObject, 'class2'); % res = isSubclassOf(metaObject1, metaObject2); % % $Id: isSubclassOf.m,v 1.3 2011/04/29 15:02:17 ingo Exp $ % function res = isSubclassOf(varargin) if nargin ~= 2 help(mfilename); error('Incorrect inputs'); end mo1 = getMetaObject(varargin{1}); mo2 = getMetaObject(varargin{2}); if isempty(mo1) || isempty(mo2) error('### One of the inputs is not a meta class object/name'); end res = lt(mo1, mo2); end function obj = getMetaObject(in) if ischar(in) obj = meta.class.fromName(in); elseif isa(in, 'meta.class') obj = in; else error('Unknown input format for object of class %s', class(in)); end end function res = checkIsSubclass(mo1, mo2) res = false; % is the super class a user object subclass? if strcmp(mo1.Name, mo2.Name) res = true; else for kk=1:numel(mo1.SuperclassList) mo = mo1.SuperclassList(kk); res = checkIsSubclass(mo, mo2); if res return; else % keep searching... end end end end