🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.pascal
Article #185

Pointers in Pascal.

#185
From: Murakami Hiroshi
Date: Mon, 27 Oct 1997 00:00
31 lines
1687 bytes


             $B%Q%9%+%k$K1w$1$k%]%$%s%?!<JQ?t$H(B
         $BF0E*JQ?t3d$jEv$F2rJ|$N<jB3$-$K$D$$$F$N5?Ld(B
-------------------------------------------------------------

Pascal$B$K1w$$$F!"%]%$%s%?!<JQ?t$OJQ?t$N=i4|CM$,!VITDj!W$G$"$k$N$O!"(B
$B@0?t$J$I$NB>$N7?$r;}$DJQ?t$HF1MM$G(B, $B$d$`$rF@$J$+$C$?$N$+$b$7$l$J$$(B
$B$1$I!";DG0$G$"$C$F$3$l$O(B nil $B$G$"$l$PNI$+$C$?(B.

$B$^$?!"F0E*JQ?t$N3d$jEv$F<jB3$-$N(B new $B$O(B, $B3d$jEv$F$K<:GT$7$?$i(B
$B0z?t$N%]%$%s%?JQ?t$X(B nil $B$rF~$l$FJV$9$H$$$&$U$&$K$O5,Dj$7$F(B
$B$$$J$$$N$+$J(B?

$BF0E*JQ?t$N2rJ|$N<jB3$-(B dispose $B$O(B, $B2rJ|$7$?$i0z?t$N%]%$%s%?!<(B
$BJQ?t$O!VITDj!W$NCM$r$H$k$H$J$C$F$$$k$h$&$G$9$,!"$3$l$b;DG0$G$"$C$F(B
$B$3$NCM$O(B nil $B$G$"$l$P$h$+$C$?(B.

dispose $B$r8F$V;~$K(B nil $B$,EO$5$l$?>l9g$N?6Iq$$$b7h$a$i$l$F(B
$B$$$J$$$h$&$G$9$M(B.

------
$B5,3J$K9gCW$5$;$J$,$i0BA4%5%$%I$K8~$1$?=hM}7O$G$"$k$J$i$P(B, 
$B!VITDj!W$H$J$C$F$$$k$H$3$m$r(B nil $B$K@_Dj$9$k!"$b$7$/$O(B
$B%7%9%F%`MQ0U$N(B nil$B0J30$N$5$i$J$kL58z$J%]%$%s%?!<CM(B void $B$r(B
$B@_Dj$7(B, $BCM$,(B void $B$J%]%$%s%?!<JQ?t$rMQ$$$F;2>H$7$h$&$H$7$?$i!"(B
$B%H%i%C%W$5$l$k$h$&$K$9$kJ}$,$h$$(B.

$B$$$:$l$K$;$h!"J#?t$N%]%$%s%?!<$+$i;X$5$l$F$$$k$+$b$7$l$J$$(B
$BF0E*JQ?t$r(B dispose $B$9$k$N$O62$$$M(B.
Technical Details
Message-ID: <6327kl$5jq@news02.so-net.or.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: ff90a,3b368ff00d90896a,start
X-Google-Attributes: gidff90a,public
From: nws830@ca2.so-net.or.jp (Murakami Hiroshi)
Subject: Pointers in Pascal.
Date: 1997/10/27
Message-ID: <6327kl$5jq@news02.so-net.or.jp>
X-Deja-AN: 285311705
Distribution: fj
Organization: So-net
Newsgroups: fj.lang.pascal