<div dir="ltr">Thank you for commenting.<div class="gmail_extra"><br><br><div class="gmail_quote">2014-05-01 17:59 GMT+08:00 Piotr Caban <span dir="ltr"><<a href="mailto:piotr.caban@gmail.com" target="_blank">piotr.caban@gmail.com</a>></span>:<br>

<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div><div>On 05/01/14 10:16, Shuai Meng wrote:<br>

<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
Changelog:<br>
   added tests on object subtype.<br>
   improved CBool.<br>
<br>
<a href="https://newtestbot.winehq.org/JobDetails.pl?Key=6689" target="_blank">https://newtestbot.winehq.org/<u></u>JobDetails.pl?Key=6689</a><br>
<br>
---<br>
  dlls/vbscript/global.c      | 41<br>
++++++++++++------------------<u></u>-----------<br>
  dlls/vbscript/tests/api.vbs | 42<br>
++++++++++++++++++++++++++++++<u></u>++++++++++++<br>
  2 files changed, 54 insertions(+), 29 deletions(-)<br>
</blockquote></div></div>
The tests are not passing on wine:<br>
run.c:1013: Test failed: api.vbs: L"Err.number = 0"<br>
run.c:1013: Test failed: api.vbs: L"Err.number = 0"<br>
run.c:1013: Test failed: api.vbs: L"Err.number = 0"<br>
<br></blockquote><div>I have changed the tests like this and they can pass on wine with no failure. </div><div><div>481 Sub testCBoolError</div><div>482     on error resume next</div><div>483 </div><div>484     Call Err.clear()</div>
<div>485     Call CBool("")</div><div>486     Call ok(Err.number = 13, "Err.number = " & Err.number)</div><div>487 </div><div>488     Call Err.clear()</div><div>489     Call CBool("#False#")</div>
<div>490     Call ok(Err.number = 13, "Err.number = " & Err.number)</div><div>491     </div><div>492     Call Err.clear()</div><div>493     Call CBool("#True#")</div><div>494     Call ok(Err.number = 13, "Err.number = " & Err.number)</div>
<div>495     </div><div>496     Call Err.clear()</div><div>497     Call CBool("MyObject")</div><div>498     Call ok(Err.number = 13, "Err.number = " & Err.number)</div><div>499 End Sub</div></div><div>
<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">

These are the failing tests:<br>
Call testCBoolError("#TRUE#", 458)<br>
Call testCBoolError("#FALSE#", 458)<br>
Call testCBoolError(MyObject, 458)<br>
<br></blockquote><div>As showed above, I have changed 458 into 13, and can pass on winxp. However there two failures come nowhere like this:</div><div><div>run.c:1013: Test failed: api.vbs: L"Err.number = 0"</div>
<div>run.c:1013: Test failed: api.vbs: L"Err.number = 0"</div></div><div>I can't understand it: if Err.number = 0 then everything is right, why does it come out?</div>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
Could you please also add following tests:<br>
MyObject.myval = 1<br>
Call ok(CBool(MyObject) = True, "CBool(MyObject) = " & CBool(MyObject))<br>
MyObject.myval = 0<br>
Call ok(CBool(MyObject) = False, "CBool(MyObject) = " & CBool(MyObject))<br></blockquote><div> </div><div>Ok, but does this mean I am testing object in the proper way?</div><div> </div></div><br></div></div>