Article View: fj.lang.pascal
Article #165Re: Pascalのunion
From: Haruo Toda
Date: Wed, 24 Sep 1997 00:00
Date: Wed, 24 Sep 1997 00:00
28 lines
1071 bytes
1071 bytes
$B?73c$N8MED$G$9(B
In article <60a3ea$iqe@csdnews.sm.sony.co.jp>,
sakamoto@sm.sony.co.jp wrote:
[snip]
> program main(output);
> var
> sample :
> record
> case integer of
> 0: ( word : integer );
> 1: ( byte0, byte1, byte2, byte3 : char );
> end;
[snip]
$B$3$NNc$@$H(B
sample :
record
case boolean of
false : ( word : integer );
tue : ( byte0, byte1, byte2, byte3 : char )
end;
$B$G$b(BO.K.$B$G$9$M!#(B
--
Haruo Toda, Niigata Univ.
Technical Details
Message-ID:
<toda-2409971854000001@ph1pc3.med.niigata-u.ac.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<3427C7AC.225B4D2B@hi-net.or.jp> <60a3ea$iqe@csdnews.sm.sony.co.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: ff90a,41ce56e12aa187d5,start X-Google-Attributes: gidff90a,public From: toda@med.niigata-u.ac.jp (Haruo Toda) Subject: Re: Pascalのunion Date: 1997/09/24 Message-ID: <toda-2409971854000001@ph1pc3.med.niigata-u.ac.jp> X-Deja-AN: 275108988 References: <3427C7AC.225B4D2B@hi-net.or.jp> <60a3ea$iqe@csdnews.sm.sony.co.jp> Organization: Niigata Univ, Med, Physiol. Newsgroups: fj.lang.pascal