qfterror.m

来自「机器人控制仿真程序一书的所有源代码」· M 代码 · 共 24 行

function qfterror(flag,info)
% QFTERROR Caught error function. (Utility Function)
%          QFTERROR is executed if there is an error with SISOBNDS and GENBNDS.
%          It is also used by the demo facility to catch errors that may
%          occur.

% Author: Craig Borghesani
% 7/18/94
% Copyright (c) 1995-98 by The MathWorks, Inc.
%       $Revision: 1.4 $

if flag == 1, % An error occurred in a bound manager function

 close(info(1));

elseif flag == 2, % An error occurred during a demo session

 h = errordlg('An error has occurred in this demo','message','on');
 butn = findobj(h,'style','pushbutton');
 callbk = get(butn,'callback');
 set(butn,'callback',[callbk,';close([windows,info_win]);figure(demo_win);']);

end