気晴らしにいじっていたプログラムがどうやらちゃんとしたようなので, 送っ
  てみます. なにか, おもしろいことないですかね?

  # ABCL/f 風の複数 reader/単独 writer な linearizable オブジェクトは
  # すぐ作れそうですが.

  Description:
    * actor のようなものを実現してみました.
    * 具体的には become による behavior replacement を実装しただけです
      が.
    * ActorBehavior を include したオブジェクトのみが Actor の 
      behavior になれます.
    * 現在の behavior で解釈できないメッセージはキューイングされます.
    * で, メッセージの到着順は保証されません.
    * サンプルに有界バッファのプログラムを付けてあります.
    * send を非同期送信に再定義しています.
    * 役に立ちません (^^;

  tar + gzip + uuencode となっております....

begin 644 actrb.tar.gz
M'XL( (CTZ#0  ^U7;4_C1A#F:_=7# G2!1J<EP:B(M !*N53=2V%]@.'K'6\
M27PXMKOK)>5R^>^=?3,.23BD'E!5'H%CS^[.S#,[.S-+!WG*6X).LIAMO!!U
MVNW^WAYLP ^]7G??_G;QUQ#RV@#[O7ZW / W][/8!.M[?7V8#V2QE4)BERR@$V
M;FG^^2D/W,N [DY^W'\-FUZ1ZILM*7@K3@<T;@51TN(RN">$L[]DQ!G4,LH%
MHWQ4(R1D0Y""CA@!R'B4Y%"[4I\'4)]MM>=PO1O>X(-#(B<^9S1D7"C&5#.F
M/,H-0[!!FH3BYF-2(RP)R=;5[R?G9W $[[3T=X34 751&>=J9< XI$.P H$F
M(5A99.O#KY<^QY6=MGF?FG>BK3[A(]%H-R&)XB;4PAH^^(%Z3@]JVX24K,15
M1I27IWY$2N:ZD:D9V?KI[/3JW#%#0A +?IU<G/]QW;[1<R :ZF_8/(+KFY(G
MJ3IIZ,9!3(6 4RK8:2J3D(6G<CAD')T:)8-8A / Q.U,Q3-J9W4:KXRO%1$N41
MC://K"'PT03T80Y*Q391A^A8<?%;_1B&G:!^D*$<K?ZM^K-)EM\OZ(?#E38I
MW9G,&VGP:?M!KI=),0;D:5;"_L[]P-J+*G]A820G"Y*\A$T;Q\9R+<$(LV%4
M_Y@'&!03)C"4%J3-59"HF69\4=4RK)]E'#\7U8CE6O(=C:7RG $FQM$P?VM4
MUJAE?"ML^!?[AI%J0>O8.3)!1$Q6?@Q_R;5KP+-8K!,A6#PT<Q#1-]M^@&=N
MZ!+<]AH[EP_'?P'KVJ"XT$EL.4]$30CDT.X^YC2T*C(?R,8/?#YV(9>)-6$4
M)1;9=!S%#'(N'=0"B\F>B$-)G^L,K5 I\1YNA@;TG8@9RX"KM+UG!3B7<"8&
MA50,5@%;FR6?/8+YI\[(;P#3E(("IOX4&IM&BH;CMIK!;X/7V*VK@ Z\U?&(
MA6Z;V"W0I6:(@8?E)X&.YY6*&P%;.^'PT,:*ENK\IE2:"1ZC@S',OO O&+YH
M/V_" ;IJ3JP'5FIQM1AL559:S%8M:3$3G):IU3)U6@@>4*RG*,GX4+W;$Z89
M6L9;]TO_-])=24L_/1Z\C [L__=[O;7]?[>_WW?]?Z?;[:O^O]^I^O]7H:(]
MS<<J"6!_BEF5"N"!KT^GT!E))4WUUD!?C9JP@^5+J(Q[J1=YRH4YS-2@YQ;J
M.7-2+,?[1?QXN5[P,+N<[77VPRE%PZU?E,KTEB7(^!!\8H-<Y1B3US%YN"DF
MR8<LD"-?Y_#&#BK:)N6LKCCEW.LJ^?J5#TFZJ".E*E3T68*5^@#7:1W[_H!F
MOH]V_R:99-;LAP'3F&ELCJ^2:SKTS;[HI6VKWVIGB:F'92EI9E$4"'3+49_9
MG1I(SG'=W"QFH>>:CA4*O\>[U$II23H%G3%@3'7!7UH[!_,FK/P%K\6,WK%G
MFJGG/FGEKK-RM2L7-$]8/DY#?Q()$26CQLY$V+TUQ?_RXNJL*-G.M]@EH*9;
MW3WZ/FXH:L!"GN$5UL_3]X R\.IGISYEW_K-?HXCL"FDV!1.*49<,BH<4AS!
M# _-0K_Y=9%J&T<I-J)I4G:PA5@<8S%Z[,9RB#\$/CHH27,5\EXD?/I^Z1JK
M6R :"73T?<;..$^QP3#78BA.3'VF!20BP],]APFF9W<O5G?_1:&U!<3.=CPI
M[MPI66BMS%P_7O18DS24\>JKME[0T'8M(#-%LH3M*YCJ,[MB 4S "AA+YNOY
M&@"U\A?\;BX&I2M=L<);EW7<N#MS#O];EYV**JJHHHHJJJBBBBJJJ****JJH
0HHHJJN@5Z!_)ZG_H "@  '7<
 
end

======================================================================
  柳川 @ 情報システム学研究科 . 電気通信大学
  katze / yuba.is.uec.ac.jp                          February 17, 1998
「それって...い, いやがらせ?」「ううん, 確信犯」