id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
413	"""unimplemented"" message"	imendez	Jorge	"Hello, we have a big problem and I can't reproduce it. Some Tol or Tcl function
returns an error (""Unimplemented"") and I can't isolate the problem. The code is:

      Real pidNumber = Eval(pid);
WriteLn(""2.  pidNumber\t""<< pidNumber);
      Real ok = LauSocketKill(computer, pidNumber);
WriteLn(""3. ok""<< ok);
      Text If(EQ(ok, 0),
      {
        WriteLn(Tclmc(""Process finalized""));
WriteLn(""4."");
        pid
      },
      {
WriteLn(""5."");
        WriteLn(""<E>""+
          Tclmc(""It has not been possible to finalize the process"")+""</E>"");
WriteLn(""6."");
        pid

You can see the ""WriteLn"" with numbers that I've put in order to find the
critical error point. ""Tclmc"" is inside this code, between points 5 and 6. So I
trace this function:

Text Tclmc(Text string)
{
WriteLn(""a"");
  Text mcstring = ""mc \""""+string+""\"""";
WriteLn(""b"");
  TclEvalT(mcstring)
};

The error message is always after ""b"" WriteLn, so I, once more, introduce
similar traces in ""TclEvalT"" function

Text TclEvalT(Text Cmd)
{
WriteLn(""c: Cmd: ""+ Cmd);
  Set evalTcl = Tcl_Eval(Cmd);  // Cambiar por ""TolTclEval""
WriteLn(""d"");
  Text If(Not(evalTcl[2]),
    TclError(evalTcl[1])
  );   
WriteLn(""e"");
  evalTcl[""result""]  
};

TOL returns next output:

1.
a
b
c: Cmd: mc ""Sub process marked like finalized""
d
<E>Unimplemented</E>
e
Unimplemented
2.  pidNumber	2620.0000000000
3. ok0.0000000000
a
b
c: Cmd: mc ""Process finalized""
d
<E>Unimplemented</E>
e
Unimplemented
4.

Does someone know why these ""Unimplemented"" messages appear?

Thank you.
Regards."	defect	closed	highest		Interface	head	critical	fixed		Alfredo Torre