🚀 go-pugleaf

$@$b$&7hCe$O$D$$$?$H;W$C$F$$$?>>ED(J@$@El9)Bg$G$9(J.

In article <MOHRI.92Jun25225648@amber.math.keio.ac.jp> $@LSMx!w7DXf$5$s(J:

   $@$3$NJV;v$O!"(JCommonLISP $@$N;EMM$@$H$$$&$N$G$O(J$@$J$/$F!"(JCMU CL $@$N;EMM$@$H$$(J
   $@$&$D$b$j$@$C$?$N$G$O$"$j$^$;$s$+!)(J($@$D$^$j(J Fahlman $@$N=q$-4V0c$$!)(J)

$@$G$O(J$@$J$$$h$&$G$9(J. $@$G$b(J,

   $@$@$+$i!"$o$6$o$6(J

    >CMU Lisp$@$r$*;H$$$K$J$k$H$o$+$j$^$9$,(J, $@$$$-$J$j(J(setq x 1)$@$r$d$k$H7k2L$r(J
    >$@JV$9$@$1$G$O$J$/(J, $@JQ?t(Jx$@$,(Jspecial$@@k8@$5$l$?;]I=<($5$l$^$9(J!

   $@$J$s$F$3$H$,5/$-$k(J$@$N$G$O!)(J
   $@$=$l$G!"$3$N>l9g$N!V@k8@!W$H$$$&$N$O(J proclaim $@$J$o$1$G$9$h$M!#(J

$@%U%`%U%`(J... 
(proclaim '(special x))
(defun foo (x) ...) ;; x is a special variable!
$@$H$$$&$3$H$G$9$+(J.

$@2P$r$D$1$?@UG$$,$"$k0J(J$@>e(J, CMU Lisp$@$N%I%-%e%a%s%H$r8+D>$7$F$_$^$7$?(J.
$@$=$&$9$k$H(J, $@<!$N$h$&$JJQ?t$,$"$k$3$H$,$o$+$j$^$7$?(J. 
(defvar *top-level-auto-declare* :warn 
  "This variable controls whether assignments to unknown variables at top-level 
   (or in any other call to EVAL of SETQ) will implicitly declare the variable 
   SPECIAL.  These values are meaningful: 
     :WARN  -- Print a warning, but declare the variable special (the default.) 
      T     -- Quietly declare the variable special. 
      NIL   -- Never declare the variable, giving warnings on each use.") 

$@$3$3$G(J, nil $@$r;XDj$7$F$*$1$P;d$,Ds=P$7$?$h$&$JLdBj$O(J$@$*$-$^$;$s(J. $@$G$b(J, 
nil $@$O(J"$@@k8@$7$J$$(J"($@2?$8$c%3%j%c(J!)$@$3$H$G2sHr$7$F$$$k$o$1$G$9$h$M(J. $@CJ!9(J
$@F,$,:.Mp$7$F(J$@Mh$?(J.

$@$3$NJQ?t$O(JCLtL2$@$K$O$"$j$^$;$s(J. CLtL2$@$G$O$3$N$h$&$J;~(J, $@$I$&$d$C$F(Jspecial
$@$r2sHr$9$k$N$G$7$g$&$+(J? $@$=$l$H$b(J, $@$=$b$=$b;d$,Ds<($7$?$h$&$J;H$$J}$,(J
$@LdBj$J$N$G$7$g$&$+(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