Newsgroups: comp.lang.scheme,comp.lang.scheme.scsh,comp.lang.lisp,comp.lang.tcl,comp.lang.functional,comp.lang.c++,comp.lang.perl.misc,comp.lang.python,comp.lang.eiffel
Path: cantaloupe.srv.cs.cmu.edu!nntp.club.cc.cmu.edu!goldenapple.srv.cs.cmu.edu!das-news2.harvard.edu!oitnews.harvard.edu!news.dfci.harvard.edu!camelot.ccs.neu.edu!news.mathworks.com!cam-news-hub1.bbnplanet.com!cpk-news-hub1.bbnplanet.com!news.bbnplanet.com!ais.net!uunet!in3.uu.net!uucp6.uu.net!fi.gs.com!news
From: Russ McManus <mcmanr@nytrdc058.eq.gs.com>
Subject: Re: Ousterhout and Tcl lost the plot with latest paper
Message-ID: <ncju3lhfghc.fsf@nytrdc058.eq.gs.com>
Lines: 26
Sender: news@fi.gs.com (Netnews Administrator)
Nntp-Posting-Host: nytrdc058.eq.gs.com
Organization: International Equities - Goldman, Sachs & Co
X-Newsreader: Gnus v5.3/Emacs 19.34
References: <rcybba5k9c.fsf@redwood.skiles.gatech.edu>
	<334412fb.7359993@news.demon.co.uk> <5i7euq$cmg@engnews2.Eng.Sun.COM>
	<E88Ir4.EK4@undergrad.math.uwaterloo.ca> <5ib1ti$q15@yama.mcc.ac.uk>
Date: Tue, 8 Apr 1997 19:43:11 GMT
Xref: glinda.oz.cs.cmu.edu comp.lang.scheme:19422 comp.lang.scheme.scsh:539 comp.lang.lisp:26536 comp.lang.tcl:66071 comp.lang.functional:8724 comp.lang.c++:259654 comp.lang.perl.misc:73193 comp.lang.python:20706 comp.lang.eiffel:19443

fellowsd@cs.man.ac.uk (Donal K. Fellows) writes:

> 
> OK, let's raise the stakes a little.  :^)
> 
>   toplevel .t
>   button .t.b -text Hi! -font {Times 16} -command {puts "Pressed at (%x,%y)"}
>   pack .t.b -fill both -expand 1
> 
> The button now appears in a separate window to the main application
> window, and reports where it was pressed.  When this window is
> resized, the button will occupy any extra space allocated.  How much
> extra Lisp would be needed to achieve this?
> 

if you are using STk, then there is a nearly direct translation
from the tcl version to the scheme version.  you also get to
program in scheme, which is considerably more powerful than
tcl.

-russ

-- 
Russell D. McManus             phone: 212-357-4901
Goldman, Sachs & Co.            beep: 917-556-0708
Intl. Equities Technology
