Newsgroups: fj.lang.ruby,fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!news.trc!nf2.iij.ad.jp!nr0.iij.ad.jp!news.iij.ad.jp!news.ctc.ne.jp!news.idc.ad.jp!news.ptopnet.or.jp!news.oki.co.jp!newsoffice.oki.co.jp!mtcss1k!aoi!lion!suzuki
From: suzuki@otsl.co.jp (SUZUKI Hisao)
Subject: Re: ruby vs python?? ^^;;; (Re: send POST request with telnet)
In-Reply-To: Yukihiro Matsumoto's message of 02 Mar 1998 13:51:40 +0900
Message-ID: <SUZUKI.98Mar3121150@oz.otsl.oki.co.jp>
Lines: 133
Sender: news@lion.otsl.oki.co.jp
Nntp-Posting-Host: oz
Organization: Oki Technosystems Laboratory, Inc., Nagoya, Japan
References: <864t1qerg8.fsf@soleil.localnet.or.jp>
	<7szpjgjw41.fsf@sdd.tokyo-sc.toshiba.co.jp>
	<86sop8fall.fsf@soleil.localnet.or.jp>
	<SUZUKI.98Feb26123600@oz.otsl.oki.co.jp>
	<86u39mptwb.fsf@soleil.localnet.or.jp>
	<SUZUKI.98Mar2082701@oz.otsl.oki.co.jp>
	<lvn2f9snj7.fsf_-_@picachu.netlab.co.jp>
Date: Tue, 3 Mar 1998 03:11:50 GMT
Xref: galaxy.trc.rwcp.or.jp fj.lang.ruby:55 fj.lang.perl:2831
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=2831&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$BNkLZ$G$9!#(B

$B5-;v(B <lvn2f9snj7.fsf_-_@picachu.netlab.co.jp> $B$h$j(B
>|$B$H$3$m$G!$(Bruby $B$G$$$&!V%$%F%l!<%?!W!$$b$H$N%"%$%G%#%"$O(B ETH
>|Oberon-2 $B$N(B
>|
>|H. M"ossenb"ock: Treating Statement Sequence as Block Objects,
>|ACM SIGPLAN Notices, vol.27, no.8 (August 1992), pp.83-86.
>|
>|$B$+$H$b;!$7$^$9$,!$$$$+$,$G$7$g$&$+!)(B $B!d$^$D$b$H$5$s(B
>|$B$=$l$H$bFHN)$7$F9M0F$5$l$?$N$G$7$g$&$+!#(B
>
>$B%$%F%l!<%?$N%"%$%G%#%"$N8;$O(BCLU$B$G$9!%;d$O(BCLU$B$r;H$C$?$3$H$J$$(B
>$B$N$G$9$,!$5WLn$5$s$N;(;o$N5-;v$+$i?(H/$5$l$F$^$9!%$*$=$i$/$O(B
>CLU$B$NJ}$,(BOberon-2$B$h$j$O$k$+$K8E$$$H;W$&$s$G$9$1$I!%(B

CLU $B$r4pHW$K$7$?FHN)$N%"%$%G%#%"$H$$$&$o$1$G$9$M!#(B

$B$3$3$G(B CLU $B$NFs$D$NNc$r(B

From: toh-hei@is.titech.ac.jp (92M04178 Toh-hei Hirofumi)
Newsgroups: fj.sources
Subject: CLU2C Version 1.1(1/23)
Date: 15 Oct 92 07:12:40 GMT
Distribution: fj
Organization: Dept. of Information Science, Tokyo Institute of Technology, Tokyo, JAPAN

$B$NG[I[FbMF$+$i0zMQ$7$^$9(B (Message-ID $B$N5-O?$O<:$o$l$F$$$^$7$?!#(B
$B$9$_$^$;$s(B)$B!#0l$D$O$9$Y$F$N(B (key, user) $B%Z%"$r(B yield $B$9$k%$%F%l!<(B
$B%?$G$9!#(B

elements = iter (tab: cvt) yields (str, str)
for ent: entry in rep$elements(tab) do
key: str := ent.key
for user: str in as$elements(ent.users) do
yield(key, user)
end
end
end elements

$B$b$&0l$D$O!$$=$N%$%F%l!<%?$r;H$C$FBh#1$N%F!<%V%k$KBh#2$N%F!<%V%k(B
$B$r%^!<%8$9$k<jB3$-$G$9!#Bh#2$N%F!<%V%k$OJQ99$5$l$^$;$s!#(B

merge = proc (tab1: xref, tab2: xref)
for key, user: str in elements(tab2) do
add_ref(tab1, key, user)
end
end merge

$B$3$l$+$iJ,$+$k$H$*$j!$(BCLU $B$N(B yield $B$O!$35G0E*$K$O%3%k!<%A%s$+$i(B
$B$N0l;~I|5"$H$$$&$+!$(Breturn $BJ8$b$I$-$J$N$G$9!#$3$N$3$H$O(B Sather 
$B$N$h$j0lHL2=$5$l$?%$%F%l!<%?$G$b;v>p$OF1$8$G$9!#(B

$B$H$3$m$,(B ruby $B$N(B yield $B$O!$$7$F$$$k$3$H$O(B CLU $B$H7k6I$OF1Ey$@$H$7(B
$B$F$b!$35G0E*$K$O$`$7$m0z?t$H$7$FEO$5$l$?4X?t$N8F=P$7$H$7$FM}2r$9(B
$B$k$N$,J,$+$j$d$9$$$b$N$J$s$G$9$h$M!#:G=i(B ruby $B$N(B yield $B$r8+$?$H(B
$B$-!$$=$l$,4X?t8F=P$7$_$?$$$KLa$jCM$r$b$C$F$/$k$H$$$&$3$H$rCN$C$?(B
$B;~E@$GL\$,E@$K$J$j$^$7$?!#L>A0$rGR<Z(B(?)$B$7$?0J30!$$H$F$b(B CLU $BEy$+(B
$B$i$R$C$Q$C$FMh$?$b$N$N$h$&$K$O;W$($^$;$s$G$7$?!#(B

$B$G!$(Bruby $B$N%$%F!<%l%?!&%V%m%C%/!$$3$l$O$I$A$i$+$H$$$&$H!$%a%C%;(B
$B%s%Y%C%/;a$N<B83HG(B Oberon-2 $B$N%V%m%C%/0z?t$H$[$H$s$IF1Ey$H$$$$$^(B
$B$9$+!$$=$N4JC1$J3HD%(B ($B0z?tEO$7$NItJ,$K$D$$$F(B) $B$H8+$J$7F@$k$b$N$G(B
$B$9!#%a%C%;%s%Y%C%/;a$N$b7k6I$O%$%F%l!<%?$r9=@.$7$F$$$k$N$G$9$,!$(B
$B%"%W%m!<%A$O(B ruby $B$N$=$l$H4q$7$/$bF1MM$G$9(B (Smalltalk $B$r$*<jK\$K(B
$B$7$F$$$k$+$N$h$&$J$H$3$m$bF1MM$G$9(B)$B!#(B

$B$G$9$+$i!$$b$7$bL$FI$J$i$P!$$"$k$$$O%I%C%Z%k%2%s%,!<$r8+$k$h$&$J(B
$B5$J,$K$J$k$+$b$7$l$^$;$s$,!$%a%C%;%s%Y%C%/;a$NJ88%$r@'Hs0lEYFI$s(B
$B$G$_$k$3$H$r$*$9$9$a$7$^$9(B ($B$"$H!$F1$8$/(B SIGPLAN Notices $B$N(B 1993 
$BG/$@$C$?$+!$(B1994 $BG/$@$C$?$+$N9f$K!$$3$l$KBP$9$k5DO@$,Fs$D$[$I:\$C(B
$B$?$O$:$G$9!#0l$D$OH]DjE*H?O@!$$b$&$R$H$D$OH?O@$X$NH?O@$HDIJd(B)$B!#(B
$B<+J,<+?H$N$H;w$?%"%$%G%#%"$,!$$^$?0c$C$?4QE@$+$i7+$j9-$2$i$l$F$$(B
$B$F!$$$$m$$$m$H?(H/$5$l$k$H$3$m$,$"$k$+$b$7$l$^$;$s(B ($B$?$H$($P!$0z(B
$B?t$H$7$F!$%V%m%C%/$rJ#?t8D$H$k$H$7$?$i$I$&$J$k$@$m$&$H$+(B)$B!#(B


>|(1) Python $B$r(B python -i $B%U%!%$%kL>(B $B$N$h$&$K5/F0$9$k$H!$(B
>|   $B%U%!%$%k$r%9%/%j%W%H$H$7$F<B9T8e!$BPOC=hM}$KF~$j$^$9!#(B
>|   $B$3$l$O%9%/%j%W%H$rESCf$^$G=q$$$F!$;D$j$O$=$N>l$=$N>l$NF~NO$G(B
>|   $B;n9T:x8m$9$k$N$K=EJu$7$^$9!#(B
>|   $B$3$&$$$C$?$3$H$O$G$-$k$N$G$7$g$&$+!)(B

>  (1) $B!V(Brbc.rb -r $B%U%!%$%kL>!W$H5/F0$9$k$HF1$8$3$H$,=PMh$^$9!%(B
>      $B$^$?BPOC%l%Y%k$G(Bload$B$d(Brequire$B$J$I$N%a%=%C%I$GFI$_9~$s(B
>      $B$GMh$k$3$H$b=PMh$^$9!%(B

$B$A$c$s$H$"$k$N$G$9$M!#$3$l$C$F!$H>40@.IJ$NCJ3,$G$H$j$"$($:;H$C$F(B
$B$_$k$N$KJXMx$G$9$h$M!#(B
$B$"$H!$(B($B<+J,<+?H$OLGB?$K;H$o$J$$$N$G$9$,!$%X%SK\$G>R2p$5$l$F$$$k(B)
reload $B$O$I$&$G$7$g$&$+!)(B $B%b%8%e!<%k$r%m!<%I$7D>$9$b$N$G$9!#(B


>  (2) object.methods$B$G$=$N%*%V%8%'%/%H$N<u$1IU$1$k%a%=%C%IL>(B
>      $B$N0lMw$,F@$i$l$^$9!%$=$NB>%/%i%9$GDj5A$5$l$F$$$k%a%=%C(B
>      $B%I$N0lMw!$JQ?tL>$N0lMw$J$I$r<h$j=P$9%a%=%C%I$bMQ0U$7$F(B
>      $B$$$^$9!%(B

$B$=$&$9$k$H!$$b$A$m$sDj5A$5$l$F$$$k%/%i%9$N0lMw!$%b%8%e!<%k$N0lMw!$(B
$BBg0hJQ?t$N0lMw$b$H$l$^$9$h$M!)(B


>|(3) Python $B$N%b%8%e!<%k$d%/%i%9!$%a%=%C%IEy!$$H$j$o$1!$:G6aDI2C(B
>|   $B$5$l$F$J$8$_$N$J$$(B ($B%^%K%e%"%k$rFI$_$?$/$J$k$h$&$J(B) $B$b$N$O!$(B
>|   __doc__ $BB0@-$K$h$k@bL@J8=q$,MQ0U$5$l$F$$$^$9!#(B
>|   $B$3$l$i$O!$%^%K%e%"%k$r$R$/$^$G$b$J$/(B print $B0z?t(B.__doc__ $B$H(B
>|   $B$9$k$3$H$G!$$=$N>l$G$9$0@bL@$rFI$`$3$H$,$G$-$^$9(B ($B1Q8l$G$9$,(B)$B!#(B
>|   $B$3$&$$$C$?JX59$O$"$k$N$G$7$g$&$+!)(B

>  (3) $B$3$l$O$G$-$^$;$s!%$=$&$$$&$N$O8@8l$KAH$_9~$`$b$N$G$O$J(B
>      $B$$$H;W$C$?$+$i$G$9!%FC$K%$%s%?%W%j%?$,Bg$-$/$J$k$N$r7y(B
>      $B$$$^$7$?!%(B

Python $B$,(B __doc__ $BB0@-$r$I$&$d$C$F@_Dj$9$k$N$+3NG'$7$^$7$g$&!#(B
Emacs Lisp ($BA4@$3&$G:G$b9-$/;H$o$l$F$$$k(B Lisp $B$N0l$D(B :-) $B$HF1$8(B
$B$/!$Dj5AK\BN$N:G=i$K%j%F%i%kJ8;zNs$,$"$C$?>l9g!$$=$l$r@bL@J8=q$H(B
$B$7$F<h$j9~$`$N$G$9!#%$%s%?!<%W%j%?$H$7$F$O!$%3%a%s%H$rFI$_$H$P$9(B
$B$@$1$N<j4V$H$=$&JQ$o$j$^$;$s!#(B

$B$b$7%i%$%V%i%j!&%=!<%9$N%U%!%$%k!&%5%$%:$,Bg$-$/$J$C$F:$$k$H$$$&(B
$B$N$J$i!$$=$l$O%W%m%0%i%`Cf$K%3%a%s%H$r=q$/$J$H$$$&$N$HEy2A$G$9!#(B
$B$b$7<B9T;~$N%a%b%j!&%5%$%:$,Bg$-$/$J$C$F:$$k$H$$$&$N$J$i!$%P%C%A(B
$B=hM}$J$$$7$O:GE,2=<B9T$N$H$-$OK\Ev$K%3%a%s%H07$$$7$FFI$_$H$P$;$P!$(B
$B$=$l$G:Q$`$3$H$G$9!#(B

$BJL$K%j%F%i%kJ8;zNs$G$J$/$F$b(B Java $B$N(B /** */ $B$N$h$&$J%3%a%s%H$N7A(B
$BBV$G$b$h$$$N$G$9$,!$3Z$7$/;H$($k%7%9%F%`$rL\;X$9$N$@$C$?$i!$>.$5(B
$B$/JD$8$?@$3&$r:n$m$&$H$9$k$N$G$J$$8B$j!$$3$&$$$C$?$b$N$O7g$+$;$J(B
$B$$$H;W$$$^$9!#(B

--
SUZUKI Hisao          >>> def fib(n): return reduce(lambda x, y:
suzuki@otsl.co.jp     ... [x[0] + x[1]] + x, [None]*n, [1L, 1L])
