<div dir="ltr"><br><div class="gmail_extra"><br><br><div class="gmail_quote">2014-05-19 17:06 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">On 05/19/14 08:47, 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">
+Call ok(CCur(0.000149) = 0.0001, "CCur(0.000149) = " & CCur(0.000149))<br>
+Call ok(getVT(CCur(0.000149)) = "VT_CY", "getVT(CCur(0.000149)) = " & getVT(CCur(0.000149)))<br>
+Call ok(CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99) = <a href="tel:2147483647" value="+12147483647" target="_blank">2147483647</a>.99, "CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99) = " & CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99))<br>


+Call ok(getVT(CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99)) = "VT_CY", "getVT(CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99)) = " & getVT(CCur<a href="tel:%282147483647" value="+12147483647" target="_blank">(2147483647</a>.99)))<br>


</blockquote>
This tests are failing on polish locale.<br>
<br></blockquote><div>Sorry, I forget this again. </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">
<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">
+Call ok(CCur(MyObject) = 0, "CCur(MyObject) = " & CCur(MyObject))<br>
+Call ok(getVT(CCur(MyObject)) = "VT_CY", "getVT(CCur(MyObject)) = " & getVT(CCur(MyObject)))<br>
+MyObject.myval = 1<br>
+Call ok(CCur(MyObject) = 1, "CCur(MyObject) = " & CCur(MyObject))<br>
+Call ok(getVT(CCur(MyObject)) = "VT_CY", "getVT(CCur(MyObject)) = " & getVT(CCur(MyObject)))<br>
+MyObject.myval = 0<br>
+Call ok(CCur(MyObject) = 0, "CCur(MyObject) = " & CCur(MyObject))<br>
+Call ok(getVT(CCur(MyObject)) = "VT_CY", "getVT(CCur(MyObject)) = " & getVT(CCur(MyObject)))<br>
</blockquote>
There are two identical tests on MyObject. MyObject.myval is set to 0 in first test (it's set this way in earlier tests).<br>
<br></blockquote><div>The first test is different from the third: in the first test I didn't set MyObject.myval  to 0 explicitly, the goal is to  </div><div>test object's default value; while the third test set MyObject.myval  to 0 explicitly, this changes the default value of a object, though the value is still 0.</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">
Thanks,<br>
Piotr<br>
</blockquote></div><br></div></div>