[Xotcl] alloc error

[michael.heca at email.cz]

Hi,

I found error in running XOTclIDE with new xotcl from version 1.3.0.

Error is raised by similar code:
---------------------------------------------
#!/usr/bin/tclsh

package require XOTcl
namespace import ::xotcl::*

Class NS
Class NS::Main

NS::Main proc m1 {} {
    my m2
}

NS::Main proc m2 {} {
    namespace eval :: Object crash
}

NS::Main m1
---------------------------------------------
Error is:
---------------------------------------------
couldn't find result of alloc
    ::xotcl::Object ::xotcl::Class->create
    ::xotcl::Object ::xotcl::Class->unknown
    invoked from within
"Object crash"
    (in namespace eval "::" script line 1)
    invoked from within
"namespace eval :: Object crash"
    (procedure "m2" line 3)
    ::NS::Main->m2
    invoked from within
"my m2"
    (procedure "m1" line 3)
    ::NS::Main->m1
    invoked from within
"NS::Main m1"
    (file "T:\home\heca\test\xotcl\e130.tcl" line 18)
---------------------------------------------

If i directly call NS::Main m2, everything is ok.

It is xotcl error or problem is in this code?


Michael Heca