🚀 go-pugleaf

$B2OLn(B $B??<#(B@$BN05eBg>pJs9)3X$G$9!#(B

In article <873uhi$qek$1@news1.u-ryukyu.ac.jp> , 
	hisa@eve.u-ryukyu.ac.jp (MUNEMOTO Hisaya) writes 
>lisp$B%b!<%I$H$$$&$N$O$I$s$J$b$N$G$7$g$&$+!#(B

$B;W$$=P$7$?!#(B{} $B$,(B () $B$^$G$N0\F0!"(B[]$B$,(B lisp $B$N4X?t$NDj5A$X$N(B
$B0\F0$K$J$j$^$9!#(Bnolisp mode $B$@$H!"%Q%i%0%i%U$H$+$N0\F0$G$9$M!#(B
showmatch $B$HAH$_9g$o$;$k$N$,(B good$B!#(B

$B$J$s$H!"KM$O!"(BOPENSTEP $B$N=c@5(Bvi + Cannon $BF|K\8l%5%]!<%H$r;H(B
$B$C$F$$$k$N$G!"$^$@(B lisp mode $B$O$"$j$^$9!#(Bver 3.7 $B$N=c@5$@!#(B
$B$b$A$m$s!"(Bshowmode $B$O$"$j$^$;$s!#(Bslowopen $B$r0&MQ$7$F$$$?$N$O!"(B
$B$$$D$^$G$@$C$?$+$J(B?

$B0J2<$NNc$G;n$7$F$_$F$/$@$5$$!#(B($B$C$FC/$,;n$9$+$C$F!<$N(B)
:set lisp showmatch
$B$G!"(B}} $B$H$+!"(B]] $B$H$+$9$k$o$1$G$9$M!#(B

(defun fact (n)
    (cond ((> n 0) (* n (fact (- n 1)))
	  (t 1))))

(defun fact (n)
    (cond ((> n 0) (* n (fact (- n 1)))
	  (t 1))))


---
Shinji KONO @ Information Engineering, University of the Ryukyus
$B2OLn??<#(B @ $BN05eBg3X9)3XIt>pJs9)3X2J(B