[Xotcl] Is this a bug?

[Murr, Florian]

package require XOTcl 1.3.8
namespace import xotcl::*

Class X -parameter {
    {y y0}
}
X instproc init {args} { puts "[self] init '$args'";  next }
X instproc y {args} {
    set x [next]
    puts "[self] y '$args'"
    set x
}
X create x -y y1
puts "expected 'y1', but got: '[x y]'"



regards,
- Florian Murr