Article View: fj.lang.pascal
Article #249Re: Pascal/Delphi
From: okahisa
Date: Fri, 10 Jan 1997 00:00
Date: Fri, 10 Jan 1997 00:00
60 lines
2117 bytes
2117 bytes
$B2,5W!w0&I2Bg3X$G$9!#(B
<E3rFFD.xu@info.sinet.ad.jp>$B$N5-;v$K$*$$$F(B
C00279@sinet.ad.jp$B$5$s$O=q$-$^$7$?!#(B
>> $B>e$NFbMF$r4^$`5-;v$r8+$^$9$H!"FbMFE*$J$3$H$K$D$$$F$N%3%a%s%H$O!"(B
>> $B0l1~:Q$s$@$H$9$k$Y$-$H$-$N$h$&$G$9$M!#(B
$B$=$N$h$&$G$9$M!#$^$"!"8e$O3Z$7$/$d$j$^$7$g$&!#(B
fj.lang.pascal $B$rA{$,$;$k$?$a$K(B (^^;;
>> $B#P#C$N@$3&$G$O!"(BPascal$B$O(BDelphi$B$K$J$C$F$$$^$9$7!#(B
$B$`$`!"$3$l$O!V(BDelphi $B$O(B Pascal$B!W$G$O$J$$$G$9$+!)(B
(Delphi is-a Pascal) $B$8$D$O!"$3$l$O<+L@$@$+$i(B $B!V(BPascal $B$O(B
Delphi$B!W$HAH$G!V(BPascal == Delphi$B!W(B(C $BN.$G$9(B)$B$H$$$&<gD%$@$C(B
$B$?$j$7$F!#$&!<$s?<$$(B...
>> $B2,5W$5$s$K!"FC$K(BPascal$B$r0-$/8+$?$$$H$$$&%P%$%"%9$r46$8$?<!Bh$G$9!#(B
$B$$$d!<!"(BC++ $B$b0-$/8+$F$?$j$7$^$9$h(B (^^;; $B>\$7$/$O(B
fj.lang.c++ $B$r8fMw$/$@$5$$!"$b$&2a5n$N5-;v$O$[$H$s$I;D$C(B
$B$F$J$$$+$b$7$l$^$;$s$,!#(B
>> $B:G8e$K0l8@(B:
>>
>> Type
>> TOL = class ... end; // override$B$N=`Hw(B
>> TOP = class(TOL) Pascal ... end; // $B%/%i%97?$G$J$$$H7Q>5$G$-$J$$(B
>> TVOP = class(TOP) $B%S%8%e%"%k(B ... end;
$B<B$O$3$l!"Mn$A$,$"$C$F(B...
class Pascal
{
public:
virtual void file_assign() = 0;
// ...
};
class Ada : public Pascal { /* ... */ };
class Cxx : public C, public Simula, public Ada { /* ... */ };
Cxx gcc(GNU)$B!((B
Pascal &pascal = gcc; // OK... $B2?$F$3$C$?(B
$B$G$b!"2,K\$5$s$O(B Delphi $B;H$&$+$i!"$3$&$$$&$3$H$O5/$3$i$J$$$s(B
$B$G$9$h$M!#9M$($l$P9M$($k$[$I9*L/$@(B... $B<:Ni$7$^$7$?!#(B
--
Email: okahisa@cs.ehime-u.ac.jp
Technical Details
Message-ID:
<5b56if$s7g@doc.dpc.ehime-u.ac.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<E3rFFD.xu@info.sinet.ad.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: ff90a,21131d4a7ebf3b27 X-Google-Attributes: gidff90a,public From: okahisa@cs.ehime-u.ac.jp Subject: Re: Pascal/Delphi Date: 1997/01/10 Message-ID: <5b56if$s7g@doc.dpc.ehime-u.ac.jp> X-Deja-AN: 208909793 references: <E3rFFD.xu@info.sinet.ad.jp> organization: Ehime University, Japan newsgroups: fj.lang.pascal