<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<head>
<meta http-equiv="cache-control" content="max-age=180,private" />
</head>
<card id="discuz_wml" title="CnPack Forum">
<p>#1 一个小bug报告！<br /><small>在CnPasCodeParser.pas这个文件中，第256行到270行，这里对tkClass进行判断的时候，漏了<br />
一种情况，就是忘了判断这个时候可能出现的tkEnd，<br />
因为在interface中类的声明情况可能如下<br />
TSayHello = class<br />
end;<br />
而原来代码遗漏了这种情况下的判断。<br />
我个人的修改如下<br />
tkClass:<br />
  begin<br />
    if Lex.IsClass then<br />
    begin<br />
      Result.PosKind := pkClass;<br />
      DoNext(True);<br />
      if (Lex.TokenPos &lt; CurrPos) and (Lex.TokenID  ..</small><br />
</p>
<p>#1 <a href="index.php?action=thread&amp;tid=326&amp;start=0&amp;offset=497&amp;sid=pPOSKk">&gt;&gt;Next Page</a><br />
<br />Forum:<a href="index.php?action=forum&amp;fid=8&amp;sid=pPOSKk">CnPack IDE 专家包（CnW ...</a>
<br />Thread:<a href="index.php?action=thread&amp;tid=326&amp;sid=pPOSKk">一个小bug报告！ ...</a>
<br />Next Thread:<a href="index.php?action=thread&amp;tid=318&amp;sid=pPOSKk">每日构建为什么是空的 ...</a>
</p>
<p align="center"><br /><a href="index.php?sid=pPOSKk">Home</a><br />
<a href="index.php?action=login&amp;sid=">Login</a><br /><br />
<small>Powered by Discuz!</small></p>
</card>
</wml>