System call error while calling a function
<p>I am calling a function as below:</p>

<pre><code>write_phy 1 0 0x100
</code></pre>

<p>While the function write_phy is:</p>

<pre><code>proc write_phy {phy register value} {
  if { [regexp {^0} $value] } {
        scan $value "%o" value
     }

  if {$::DEBUG} {
       puts [format "Write PHY %s register %s = 0x%0.8X" $phy $register $value]
    }
 # exec ./write_phy.pl $phy $register $value
}

after 1;
</code></pre>

<p>While executing the function I am getting a system call error though the print statement works properly:</p>

<pre><code>Write PHY 1 register 0 = 0x00000000

Disallowed system call: SYS__newselect
</code></pre>

<p>Other functions in the code are working good.</p>

<p>Please help.</p>