🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.tcl
Article #529

wiki i tcl

#529
From: Witek Mozga
Date: Mon, 01 Oct 2007 05:34
19 lines
1197 bytes
Witam,

Na stronie wikipedii poswieconej Tcl znajduej sie prosty przykład aplikacji
wyświetlającej czas. To co mnie zastanawia, to wywoływanie procedury przez
samą siebie. Czy to po pewnym czasie nie doprowadzi do przepełnienia stosu?
Przecież przy każdym wywoływaniu procedury adres powrotny jest gdzie
przechowywany. 

proc every {ms body} {
    eval $body
    after $ms [list every $ms $body]
}
pack [label .clock -textvar time]
every 1000 {set ::time [clock format [clock seconds] -format %H:%M:%S]} 


-- 
Witek
Technical Details
Message-ID: <fdq0gp$jmk$1@news2.4web.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!opal.futuro.pl!news2.4web.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!opal.futuro.pl!news2.4web.pl!not-for-mail
From: Witek Mozga <mozga@trimen.pl.no.junk>
Newsgroups: pl.comp.lang.tcl
Subject: wiki i tcl
Date: Mon, 01 Oct 2007 07:34:23 +0200
Organization: 4WEB, http://www.4web.pl
Lines: 19
Message-ID: <fdq0gp$jmk$1@news2.4web.pl>
Mime-Version: 1.0
X-Trace: news2.4web.pl 1191216473 20180 193.239.206.10 (1 Oct 2007 05:27:53 GMT)
X-Complaints-To: abuse@4web.pl
NNTP-Posting-Date: Mon, 1 Oct 2007 05:27:53 +0000 (UTC)
User-Agent: KNode/0.10.4
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit