function html = findhtmllinks(h,stream)
% FINDHTMLLINKS
% This function will find all html links for diagnostic viewer
% Copyright 1990-2004 The MathWorks, Inc.
% $Revision: 1.1.6.2 $ $Date: 2004/04/15 00:30:21 $
% first find the links
[s, e, types] = find_links_l(h, stream);
% Process the link and hyperlink them
html = process_text(h, s, e, types, stream);
%--------------------------------------------------------------------------
function [S, E, linkTypes] = find_links_l(h,stream)
%
%
%
contents = h.Contents;
switch contents.type,
case {'Lex', 'Parse'}, findFiles = 0;
otherwise, findFiles = 1;
end;
S = [];
E = [];
linkTypes = {};
numFound = 0;
if ~ischar(stream), error('bad input'); end;
if nargin < 4, nag=[]; end;
prevLastErr = lasterr;
try,
%
% match standard Stateflow Ids
% suppress multibyte character warnings
%
warningState = warning;
warning('off', 'REGEXP:multibyteCharacters');
pattern = '#\d+(\.\d+)*';
[sv,ev] = regexp(stream, pattern);
warning(warningState);
for i=1:length(sv),
s = sv(i);
e = ev(i);
if s>0 & s0 & s',linkText];
% Here append all the necessary parts of this text
%include 1) firstPart
% 2) link
% 3) linkEnd
%htmlText = [htmlText, htmlBegin, link, linkEnd];
if (i == 1)
htmlText = [htmlBegin, firstPart, link, linkEnd];
else
htmlText = [htmlText, firstPart, link, linkEnd];
end;
end
end
if (length(sv) > 0)
lastLinkIndex = ev(end);
else
lastLinkIndex = 0;
end
if (lastLinkIndex > 0 & lastLinkIndex < length(infoText))
htmlText = [htmlText, infoText((lastLinkIndex+1):end)];
end
%htmlText = [htmlText,'