Konovalov, Vadim (Vadim)** CTR ** wrote:
I have uploaded the Tcl-Tk package, with my changes to a file hosting site, to avoid sending it to everyone on the list. you can get to it at http://www.sendspace.com/file/afaqr0 (Filename Tcl-Tk-jcmods.01.tar.gz)

Wow!

I'm really impressed!

Although there are some small quirks that I should modify a little, the overall 
feeling is good.

Right now the approved code branch for Tcl, Tcl::Tk CPAN modules is on the SF 
site under http://tcltkce.cvs.sourceforge.net/viewvc/tcltkce/

As SF service seriously degraded, I propose to move project hosting into 
code.google.com
http://code.google.com/p/perl-tcltk

Do you have a google login, so I will add you into the project?
Alternatively, I can add you to SF project developers.


Great!

My google login is jcer...@tx.rr.com

............

* All the perl/tk widget demos work with minimal changes (typically by just changing the "Use Tk;" to "Use Tcl::Tk (qw/ :perlTk /)" at the top of the file.

"use Tk",  "use Tcl::Tk"


The "(qw/ :perlTk /)" is there so that syntax like "$top = MainWindow->new();" from the perl/tk script will work.
* Tcl::Tk widget objects have been changed to be a blessed hash-ref, rather than a blessed array-ref, for compatibility with perl/tk.

AFAIR it was done to made widgets quicker - hash and array both quick, but 
array quicker, also should take less memory.
Is converting to hash *really* unavoidable?

Of course this is not the only reason why perl/Tk is slower.


I think converting to a hash was unavoidable. By doing this, much of the perl/tk code could be used as-is. I don't thinks this change by itself would affect the speed significantly, but there may be other changes I have made that could have slowed things down.

Is there some sort of benchmark test you have used to look at speed? It would be interesting to see if there is a speed penalty for these changes.



* To run the demos without having to install the package, type "perl -Mblib -w widgetTclTk" on the command line.

this is true, but, as long as we're pure-perl, will work even
  perl -Mblib -w widgetTclTk"

w/out even invoking "make"
Hmmm, this doesn't work for me (tried on win32). On a clean extract from the tar file. I run "perl Makefile.PL", then "perl -Mblib widgetTclTk". I get the error message

Cannot find blib even in C:\
BEGIN failed--compilation aborted.

I think you have to run make so that the .pm files in the lib directory get put over into a blib directory.

Reply via email to