🚀 go-pugleaf

$B2,5W!w0&I2Bg3X$G$9!#(B

<E3o4w4.209@info.sinet.ad.jp>$B$N5-;v$K$*$$$F(B
C00279@sinet.ad.jp$B$5$s$O=q$-$^$7$?!#(B

>> $B!!J#?t$N%U%!%$%k$r07$&%P%C%A%8%g%V$NNc$O<!$N$h$&$K$J$j$^$9!#(B
>> //   $B#J#O#BJ8(B
>> //   EXEC  PASCG
>> //PAS.SYSIN  DD  *
>> PROGRAM  DEMO;
>> VAR   F1, F2 : TEXT;
>> BEGIN
>>       WRITELN('SAMPLE PROGRAM');
>>       WRITELN(F1,'SAMPLE FILE - 1');
>>       WRITELN(F2,'SAMPLE FILE - 2');
>> END.
>> /*
>> //GO.F1 DD SYSOUT=A
>> //GO.F2 DD SYSOUT=A
>> //


  $B$3$N;~!"(BF1, F2 $B$OJQ?tL>$G$"$j%U%!%$%kL>$H$b$J$C$F$$$k(B
$B$N$G$7$g$&$+!)(B $B$@$H$7$?$i!"$d$O$j;d$OLLE]$@$H;W$$$^$9!#(B
program $B@k8@$NItJ,$O$I$&$d$i>JN,$G$-$k$_$?$$$G$9$,!#$b$A(B
$B$m$s!"<B83<B=,$K$O$=$l$G=<J,$@$H8@$o$l$l$PH]Dj$O$7$^$;$s!#(B


>> $B!d(B>> $B!!B?BV@-$O!"(BTurbo Pascal 5.5$B$J$$$7(BObject Pascal/Delphi$B$K$*$$$F$O(B
>> $B!d(B>> $B%/%i%97?!J(BTP$B$G$O%*%V%8%'%/%H7?!K$NBeF~8_49@-$K4X$9$k35G0$G$9!#(B
($BCfN,(B)
>> $B!!$b$A$m$s!"B?BV@-$O7Q>5$rA0Ds$H$7$F$$$^$9!#(B
>> $B!!(BDelphi2.0$B$G$N%/%i%97?$O$9$Y$F(BTObject$B7?$r7Q>5$7$F$$$^$9!#(B
>> $B!!(BDelphi$B$K$*$$$F!"%a%=%C%I$K(Bvirtual$B$H$+(Bdynamic$B$N;XDj$,$G$-$^$9$,!"(B
>> $B$3$l$i$HMm$a$J$/$F$bB?BV@-$N9M$(J}$O@.N)$7$^$9!#(B


  $BBeF~8_49@-$N$3$H$r8@$C$F$*$i$l$?$N$G!"$3$l$rB?BV@-$K(B
$B7k$S$D$1$k$H$9$k$H!"2>A[7k9g!&F0E*7k9g$r9M$($k$3$H$K$J(B
$B$k$+$J$H;W$$$^$7$?!#2<0L%/%i%9$r<u$1<h$l$F$b!"2>A[7k9g(B
$BF0E*7k9g$r;H$o$J$$$J$i!"F1$8%3!<%I$,8F$S=P$5$l$F$$$k$@(B
$B$1$G$9$N$G!"B?BV@-$r8l$k$K$O=<J,$H$O8@$($J$$$G$7$g$&!)(B


>> $B!!2?$r2r7h$9$k$N$+$H$$$&$3$H$G$9!#(B
>> $B!!%m!<%+%k$J4X?t$r$o$6$o$6F~$l;R$N%/%i%9$GBeMQ$7$h$&$H$9$k(B
>> $BI,MW$O$J$$$N$G$O!)(B


  $B$=$NDL$j$J$N$G$9$,(B... $BBeMQ$9$k$K$O=<J,$J$N$G$"$C$F!"(B
$B4X?tFb4X?t<+?H!":#F|$G$O$=$s$J$K;H$o$J$$$N$G$O$J$$$+$H(B
$B$$$&$3$H$G$9!#(B

  $B$3$N5DO@$,$O$8$^$C$?$H$-!"(BC $B$K$O4X?tFb4X?t$,I8=`$G$O(B
$B$J$$$+$i(B PASCAL $B$NJ}$,650iMQ$KNI$$$H$$$&$3$H$r8@$C$F$*(B
$B$i$l$?$H;W$$$^$9!#$7$+$7(B GCC $B$K$O3HD%$H$7$FB8:_$9$k$7!"(B
$B$^$?!"(BANSI C $B$G$b%U%!%$%k%9%3!<%W$r;H$&$H$$$&<j$,$"$j$^(B
$B$9!#(B C++ $B$^$G;H$&$3$H$r5v$7$F$b$i$($k$J$i!"=<J,BeMQ$9$k(B
$B5!G=$,$"$j$^$9!#$^$?!":#F|!"4X?tFb4X?t$O$=$l$[$I=E;k$5(B
$B$l$F$$$^$;$s$7!"650iMQ8@8l$K(B PASCAL $B$,E,$7$F$$$k$H$$$&(B
$B$N$O2a5n$N$3$H$G$O$H$$$&$N$,;d$N9M$($G$9!#(B

$B!t(B PASCAL $B$r;H$&2ACM$,$J$$$J$s$F8@$C$F$k$s$8$c$J$$$G$9(B
$B!t(B $B$h!#;H$&2ACM$rG'<1$G$-$k?M$,;H$($PNI$$$N$G$9!#(B

  $B>/$J$/$H$b!"(BPASCAL $B$K$O!"%*%V%8%'%/%H;X8~;Y1g5!G=$,L5(B
$B$$$N$G!"$H$j$?$F$F(B C $B$h$j650iMQ$KE,@Z$G$"$k$H$O;W$($^$;(B
$B$s!#BP$7$F(B C $B$O!"=q@R$NN`$,F~<j$7$d$9$$$H$$$&=EMW$JI>2A(B
$B%]%$%s%H$,$"$j$^$9!#NI$$=q@R$O>/$J$$$+$bCN$l$^$;$s$,A*(B
$BBr$NM>CO$,L5$$!"$b$7$/$O<j$KF~$i$J$$$h$j$O$^$7$G$9!#(B

  $B$^$"!"8&5f<<$NB?$/$,(B PASCAL $B$rI,MW$H$7$F$$$k$H$$$&$J(B
$B$iOC$OJL$G$9$M!#;d$,8@$$$?$$$N$O%i%F%s8l$h$j1Q8l$r65$((B
$B$?J}$,Lr$KN)$D$N$G$O!)(B $B$H$$$&$3$H$G$9!#(B

$B!t(B $B7+$jJV$7$^$9$,!"(BWindows $B4D6-$,@0$C$F$$$k$J$i!"(BDelphi
$B!t(B $B$OHs>o$KNI$$A*Br$@$H;W$$$^$9!#(BDelphi $B$N=q@R$O$?$/$5$s(B
$B!t(B $B$"$j$^$9$7$M(B (^^; $B3F8&5f<<$,$d$C$Q$j(B C $B$H8@$o$l$k$H%@(B
$B!t(B $B%a$G$9$1$I!#(B

--
Email: okahisa@cs.ehime-u.ac.jp