🚀 go-pugleaf

In article <TAKUO.92Jun20001212@gryphon.jaist-east.ac.jp> takuo@jaist-east.ac.jp (Takuo Watanabe) writes:

$@EOIt$5$s(J:
   $@3N$+$K!$(JCLtL2, p.224 $@$G$O!$(Jspecial$@$N(J proclamation $@$O%P%$%s(J
   $@%G%#%s%0$K1F6A$r$"$?$($k$H=q$$$F$"$j$^$9!J(JMacLisp$@$H(J$@$N%3%s(J
   $@%Q%A%S%j%F%#$N$?$a$@$=$&$G$9!K!%(J

$@>>ED(J:
      $@$7$+$7(J, $@$b$7$3$l$,K\Ev$K;EMM$@$H$7$?$i(J, $@$=$N0z(J$@?t$r%/%m!]%8%c$KEO$7$F$$$k(J
      $@$h$&$JG$0U$N4X?t$N%;%^%s%F%#%/%9$rF0E*$KJQ$($k$3$H$,2DG=$K$J$C$F$7$^(J$@$$$^(J
                                        ~~~~~~~~~~~
      $@$9(J. $@$"$k4X?t$r;HMQ$9$kA0$K(J, $@$=$N0z?t$H(J$@F1$8L>A0$NJQ?t$r30It$G(Jspecial$@@k8@(J
      $@$9$l$P$$$$$N$G$9$+$i(J.

   $@$=$&$G$O$J$$$h$&$G$9!%;n$7$K(J (setq x 1) $@$N0LCV$rJQ$($^$9!%(J
   $@$D$^$j(J setq $@$K$h$C$F(J x $@$,(J special $@$@$H(J proclaim $@$5$l$k$h$j(J
   $@A0$K(J new-fun $@$,I>2A$5$l$k$h$&$K$7$^$9!%N>J}$H$b:G8e$N(J 
   funcall $@$O(J 4 $@$rJV$7$^$7$?!%(J

$@$3$N$3$H$O>5CN$N>e$G(J, $@>e5-(J$@$G(J"$@F0E*(J"$@$H$$$&8@MU$r;H$C$F$$$^$9(J.

   .... $@Nc>JN,(J ....
   $@$I$&$b%/%m!<%8%c$r$D$/$k%9%3!<%W$,$G$-$k;~E@(J$@!J>e$NNc$G$O(J 
                                           ~~~~~~~~~~~~~~~
   (defun new-fun ...) $@$,I>2A(J$@!?%3%s%Q%$%k$5$l$k;~E@!K$G(J 
   proclaim $@$5$l$F$$$J$1$l$P%P%$%s%G%#%s%0$O1F6A$r<u$1$J$$$h(J
   $@$&$G$9!%%3(J$@%s%Q%$%k$5$l$k$3$H$r9M$($l$PEvA3$G$7$g$&$1$I!%(J

$@4{B8$N%U%!%$%k$K>e5-4X?t(Jnew-fun$@$rDj5A$7$?%U%!%$%k$r(Jinclude$@$9$k$h$&$J(J
$@%W%m%0%i%`$r=q$$$F%3%s%Q%$%k$7$?$i$I$&$J$k$G$7$g$&(J. $@4X?t(Jnew-fun$@$,(J
$@2?$r$7$h$&$H$7$F$$$k(J$@$N$+A0$b$C$F$o$+$C$F$$$J$$$H(J, $@$&$C$+$jJQ$JJQ?t$O(J
$@;H$($J$/$J$C$F$7$^$$$^$9$h$M(J($@$b$A$m$s(J, special$@JQ?t$N(J$@B?MQ$O$9$Y$-$G$O(J
$@$J$$$H$$$&JL<!85$NOC$7$OJL$K$7$F(J).

      CommonLisp$@$N;EMM$K>\$7$$J}(J, $@@'Hs@53N$J$H$3(J$@$m$r$*65$($/$@$5$$(J.

   $@;d$b$b$C$H$9$C$-$j$7$?@bL@$,CN$j$?$$$G$9!%(J

$@F146$G$9(J.
--
$@>>EDM59,(J hmatsuda@cc.titech.ac.jp
$@El5~9)6HBg3XAm9g>pJs=hM}%;%s%?(J (03)3726-1111 ext.3299
$@El5~ETL\9u6hBg2,;3(J2-12-1