🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.pascal
Article #165

Re: Pascalのunion

#165
From: Haruo Toda
Date: Wed, 24 Sep 1997 00:00
28 lines
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-mail
References: <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