<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>Hi,</p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span
class="">I have implemented a new warning option on
compilation. </span></span><span id="result_box" class=""
tabindex="-1" lang="en"><span>I did not go too far.</span> <span>A
simple checkbox "Warning On" and an "else" in the faulty
structure causing the problem of the closing parenthesis does
the trick. </span></span><span id="result_box" class=""
tabindex="-1" lang="en"><span class="">I have included a screen
copy of the dialog with the "Warning On" option.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span
class="">The behavior of StarBasic with the "Warning On"
option would be as follows.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span
class="">A) Warning On and active IDE window: Warning
displayed on line where normally there would be an error.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span>B)
Warning On and IDE window inactive: Warning at the beginning
of the macro execution in the application window.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span>C)
Warning Off: No tolerated error and no warning stop.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span
class="">For the case of the closing parenthesis, the warning
message could be the following: A closing parenthesis is
missing in one or more expressions with the Mid function.</span></span></p>
<p><span id="result_box" class="" tabindex="-1" lang="en"><span><br>
</span></span></p>
<p>In ./basic/source/comp/exprtree.cxx:1055<br>
<style type="text/css">pre { direction: inherit; }pre.cjk { font-family: "Nimbus Mono L",monospace; }p { margin-bottom: 0.25cm; direction: inherit; line-height: 120%; text-align: justify; }p.western { font-family: "Ubuntu"; font-size: 11pt; }p.cjk { font-size: 10pt; }a:link { }</style>
</p>
<pre class="western"><font style="font-size: 8pt" size="1"><font color="#808000"><span style="text-decoration: none">if</span></font><span style="text-decoration: none">(</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">(</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">pExprList->bBracket</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">&&</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">eTok</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">==</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><font color="#800080"><span style="text-decoration: none">RPAREN</span></font><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">)</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">||</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><font color="#800080"><span style="text-decoration: none">SbiTokenizer</span></font><span style="text-decoration: none">::IsEoln(</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">eTok</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">)</span><font color="#c0c0c0"><span style="text-decoration: none"> </span></font><span style="text-decoration: none">)</span></font>
<font color="#c0c0c0"> </font>{
<font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1"><font color="#808000">if</font><font color="#c0c0c0"> </font>(<font color="#800080">SbiTokenizer</font>::IsEoln(<font color="#c0c0c0"> </font>eTok<font color="#c0c0c0"> </font>)<font color="#c0c0c0"> </font>&&<font color="#c0c0c0"> </font>pExprList->bBracket<font color="#c0c0c0"><span style="background: #ffff00"> </span></font><span style="background: #ffff00">&&</span><font color="#c0c0c0"><span style="background: #ffff00"> </span></font><span style="background: #ffff00">!</span><font color="#800080"><span style="background: #ffff00">CodeCompleteOptions</span></font><span style="background: #ffff00">::IsWarningOn()</span>)</font>
<font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">{</font>
<font color="#c0c0c0"><span style="background: #ffff00"> </span></font><font style="font-size: 8pt" size="1"><span style="background: #ffff00">pParser->Error(</span><font color="#c0c0c0"><span style="background: #ffff00"> </span></font><font color="#000080"><span style="background: #ffff00">ERRCODE_BASIC_EXPECTED</span></font><span style="background: #ffff00">,</span><font color="#c0c0c0"><span style="background: #ffff00"> </span></font><font color="#800080"><span style="background: #ffff00">RPAREN</span></font><font color="#c0c0c0"><span style="background: #ffff00"> </span></font><span style="background: #ffff00">);</span></font>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">pExprList->bError<font color="#c0c0c0"> </font>=<font color="#c0c0c0"> </font><font color="#808000">true</font>;</font></span>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">}</font></span>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1"><font color="#808000">else</font></font></span>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">{</font></span>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1"><font color="#008000">//</font><font color="#c0c0c0"> </font><font color="#008000">Warning</font><font color="#c0c0c0"> </font><font color="#008000">on</font><font color="#c0c0c0"> </font><font color="#008000">compile!</font></font></span>
<span style="background: #ffff00"><font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1"><font color="#008000">//</font><font color="#c0c0c0"> </font><font color="#008000">"Closing</font><font color="#c0c0c0"> </font><font color="#008000">parenthesis</font><font color="#c0c0c0"> </font><font color="#008000">is</font><font color="#c0c0c0"> </font><font color="#008000">missing."</font></font></span>
<font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">}</font>
<font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1"><font color="#808000">break</font>;</font>
<font color="#c0c0c0"> </font><font style="font-size: 8pt" size="1">}
<img src="cid:part1.45922039.166AC7DF@gmail.com" alt=""></font></pre>
</body>
</html>