"unimplemented" message

[imendez]

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");

evalTclresult?

};

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.