🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.st80
Article #1

Re: CLOS vs Smalltalk? (Re: defstruct vs. cons+c...r (Re: RPN + logic))

#1
From: Masami Takikawa
Date: Fri, 30 Oct 1992 20:29
65 lines
3760 bytes
$B$3$s$K$A$O!"Bl@n$G$9!#(J

In article <BwLror.E1K@ulis.ac.jp>
	saka@ulis.ac.jp (Tetsuo Sakaguchi) writes:
>>$B%W%m%0%i%`$G$9!#(JCLOS $B$OJ#;($9$.$F;H$&5$$,$7$^$;$s!#(JCLOS $B$N(J
>>$BJ}$,(J smalltalk $BN.$N(J OOP $B$h$j$:$C$H$$$$!"$H$$$&0U8+$,$"$l$P!"(J
>>$BJ9$-$?$$$J$"!#(J
>
>CLOS $B$NJ#;($5$H!"(JSmalltalk $B$N(J Metaclass $B<~JU$r4^$a$?J#;($5$H$$$&$N$O(J
>$B8^==JbI4Jb$H$$$&5$$b$7$^$9$,(J:-)

Metaclass $B$OF,$5$(@Z$jBX$($i$l$l$P$H$F$bJXMx$G$-$l$$$J5!9=$@$H(J
$B;W$$$^$9!#$H$O8@$(!"4JC1$K$OM}2r$G$-$J$$$N$O;v<B$G$9$M!#%a%?$H(J
$BBP>]$r:.Mp$5$;$F$7$^$&?M$OB?$$!#$"$=$3$^$GE}0lE*$K%*%V%8%'%/%H(J
$B;X8~$7$F$-$l$$$J:n$j$K$7$J$$$G!"(JLittle Smalltalk $B$N$h$&$K(J ad hoc
$B$J:n$j$K$7$?J}$,M}2r$O4JC1$G$9$M!#(J


>$B;d$O(J CLOS $B$O$^$@$^$@%5%s%W%kDxEY0J>e$N$b$N$O=q$$$F$^$;$s$,!"(J
>Objectworks\Smalltalk $B$O$7$g$C$A$e$&;H$C$F$$$^$9!#(J
>$B$G!"(JSmalltalk $B$r;H$C$F$$$k:]$K$O!"(JCLOS $B$N$h$&$K$9$Y$F$N(J
>$B%Q%i%a!<%?$N%?%$%W$rMQ$$$F%a%=%C%I%G%#%9%Q%C%A$r$7$F$/$l$k$H(J
>$BJXMx$J$N$K$H!"$$$D$b;W$C$F$$$^$9(J($B$=$&$$$&$N$,I,MW$K$J$k;~$,7k9=B?$$$N$G(J)$B!#(J

$B$=$N5!9=$OJXMx$G$9$h$M!#?t$N1i;;$N$h$&$K%a%C%;!<%8$r<u$1$k%*%V(J
$B%8%'%/%H$H0z?t$,BP>N$N4X78$K$"$k;~$O$J$*$5$i$G$9!#KM$N6a$/$K$$(J
$B$k?M$,:n$C$F$$$k(J OOP $B8@8l$O!"$=$N5!9=$r3HD%$7$F!"G$0U$N>r7o$r(J
method $B$N>r7o$H$7$FIU$1$i$l$k$h$&$K$J$C$F$$$^$9!#Nc$($P!"0z?t(J
$B$,$"$kFCDj$NCM$N;~$@$18F$P$l$k(J method $B$J$I$rDj5A$G$-$^$9!#$-$l(J
$B$$$K=q$1$k$h$&$K$J$k$@$1$G$O$J$/!"3HD%@-$H$$$&LL$G$bM%$l$F$$$^(J
$B$9!#Nc$($P!":#(J Window $B$H$$$&%/%i%9$,$"$C$F!"$=$NCf$rEI$k(J method
$B$,$"$C$?$H$7$^$7$g$&(J:
  Window.fill(color:Integer)
$BGr9u(J Window $B$N%/%i%9$r:n$k$K$O!"(JBW_Window $B$H$$$&%/%i%9$r(J Window
$B$N;R%/%i%9$K$7$F$*$$$F!"(J
  BWWindow.fill(color:Integer) [color != white && color != black]
  { self.fill(black); }
$B$J$s$F$9$l$P$$$$$G$9$h$M!J(Jsyntax $B$O$$$$2C8:$G$9!K!#$3$&$7$F$*$1(J
$B$P!"(Jcolor $B$,Gr$H9u$N;~$O$=$N$^$^?F%/%i%9$N(J method $B$,;H$o$l!"$=$l(J
$B0J30$N;~$O?'$r9u$K$7$F:F5"$7$^$9!#MW$O!"?F%/%i%9$N(J method $B$N5!G=(J
$B$N0lIt$r!J?7$?$J(J method $B$r:n$k$3$H$J$/!K3HD%$G$-$^$9!#(J


>$B$"$H!"(J Smalltalk $B$G%^%k%A%W%k%$%s%X%j%?%s%9$^$,$$$N%3!<%I$b(J
>$B;~!9=q$/$7!"!"!#(J($B$^$!!"$3$l$O$=$l$[$I$J$$$N$G$$$$$N$G$9$,!#(J)

CLOS $B$N(J multi-inheritance $B$OKM$NF,$N(J complexity $B$rD6$($^$9(J :-)


>$B%"%/%;%5$N<+F0Dj5A$b$"$j$,$?$$$G$9$M!#7k9=(J Smalltalk $B$G$b(J
>$B%"%/%;%5DxEY$N%a%=%C%I$r;H$$$^$9$+$i!#(J

$B$3$l$OB;F@N>J}$"$k$G$7$g$&$M!#%"%/%;%5$,$"$k$H!">!<j$K%*%V%8%'%/(J
$B%H$NCf$r$$$8$l$F$7$^$&$N$G!"%G!<%?1#JC$K$J$i$J$$!#(J


>$B8D?ME*$K(J Smalltalk $B$r;H$&5!2q$,B?$$$N$O!"$"$N%W%m%0%i%_%s%04D6-$,(J
>$B$"$k$+$i$G$9!#(J CLOS $B$K4X$7$F$"$l$0$i$$$N4D6-$,<j$KF~$l$P$$$D$G$b(J
>$B>h$j49$($?$$$H$$$&$N$,N(D>$J46A[$G$9!#(J

$B$d$C$Q$j%W%m%0%i%_%s%04D6-$O=EMW$G$9$M!#8@8l20$5$s$,<jH4$-$7$,(J
$B$A$JItJ,$@$+$i!"(Jhot $B$J8&5f2]Bj$K$J$C$F$$$k$H;W$$$^$9!#!J0lHVI,MW(J
$B$H$5$l$F$$$k$N$O!"(Jparallel $B8@8l$N%W%m%0%i%_%s%04D6-$+$J!)!K(J
--
$B$?$-$+$o!s8@$$$CJ|$7!"$^$H$^$j$J$7!"7kO@$J$7$N8@8l20!w$*$l$4$s(J
Technical Details
Message-ID: <GYwKH.1040@mtak.bsj.com>
Path: arc1-ca.pugleaf.net!sparky!uunet!bsjsun!mtak!logic
References: <GVm6F.1017@mtak.bsj.com> <BwLror.E1K@ulis.ac.jp>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!bsjsun!mtak!logic
From: logic@mtak.bsj.com (Masami Takikawa)
Newsgroups: fj.lang.st80,fj.lang.lisp,fj.comp.oops
Subject: Re: CLOS vs Smalltalk? (Re: defstruct vs. cons+c...r (Re: RPN + logic))
Message-ID: <GYwKH.1040@mtak.bsj.com>
Date: 30 Oct 92 20:29:31 GMT
References: <GVm6F.1017@mtak.bsj.com> <BwLror.E1K@ulis.ac.jp>
Reply-To: logic@mtak.bsj.com (Masami Takikawa)
Distribution: fj
Organization: The Takikawa, Corvallis, Oregon, U.S.A.
Lines: 66
Posting-Front-End: Terakoya-u kaku 2.04 March 31, 1990