RE: [tcltk-perl] Why is Tcl a subclass of Tck::Tk?

[Konovalov, V. <vko...@sp...>]

> In Tcl.pm I see this code:
> 
>     unless (defined $Tcl::Tk::VERSION) {
>         package Tcl::Tk; # define empty package
>     }
>     use vars qw(@ISA);
>     @ISA = qw(DynaLoader Tcl::Tk);

I can agree this is not very correct way to do things...

> 
> Why is Tcl as subclass of Tck::Tk insted of the other way around?  The
> other way seems more logical.

Could you please explain your way of doing things?

The point here is that Tcl::Tk interpreter actually *is* plain Tcl
interpreter and may be they be'll better joined intoone single module.

OTOH having two different modules -- one is for low level communicating, and
other is for Tk part (GUI and perlTk compatibility) is very handy for me:
developing of Tcl::Tk could be done more easily and independent.

Best regards,
Vadim.