🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #218

Re: reading data from parent process without blocking

#218
From: Kikutani Makoto
Date: Mon, 08 Dec 1997 00:00
32 lines
1354 bytes
$B$-$/$?$K$G$9!#(B

Kenji Sugita<sugita@sra.co.jp>$B$5$s$O(B
$B5-;v(B<SUGITA.97Dec4185334@sran362.sra.co.jp>$B$G$3$&=q$-$^$7$?(B:

>   $B?F%W%m%;%9$+$i$I$l$/$i$$$N%G!<%?$,Mh$k$N$+J,$+$j$^$;$s$,!"?F%W%m%;%9$+(B
> $B$i$NF~NO$r(B fileevent (Tk4.0 $B0J>e(B) $B$G<u$1$F=hM}$9$k$H$$$&$N$G$O$I$&$G$7$g(B
> $B$&$+!#(B

$B$3$N%3%^%s%I$OCN$j$^$;$s$G$7$?!#(B
$B$3$s$J46$8$G;H$&$N$G$9$M!#(B
------------------------------
text .t
pack .t

proc loop {} {
    set str [gets stdin]
    .t insert end $str
}

fileevent stdin readable loop
------------------------------

$B$^$5$K$3$l$,;d$N5a$a$F$$$?$b$N$G$7$?!#(B
$B$"$j$,$H$&$4$6$$$^$7$?!#(B

-- 
$B?M@8$rGXIi$$Ej$2(B

$B5FC+(B $B@?(B(Kikutani Makoto)  kikutani@eis.or.jp hgf03701@niftyserve.or.jp
                          http://www.eis.or.jp/muse/kikutani/
Technical Details
Message-ID: <66h11n$nab$1@kiku.eis.or.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <663njq$ci4$1@kiku.eis.or.jp> <SUGITA.97Dec4185334@sran362.sra.co.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 15a83d,da435c00f0bb8eea
X-Google-Attributes: gid15a83d,public
From: kikutani@eis.or.jp (Kikutani Makoto)
Subject: Re: reading data from parent process without blocking
Date: 1997/12/08
Message-ID: <66h11n$nab$1@kiku.eis.or.jp>
X-Deja-AN: 296282025
Distribution: fj
References: <663njq$ci4$1@kiku.eis.or.jp> <SUGITA.97Dec4185334@sran362.sra.co.jp>
X-Server-Date: 8 Dec 1997 14:43:03 GMT
Organization: Na-si
Newsgroups: fj.lang.tcl