Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!mex1!jaist-news!nao
From: nao@jaist-east.ac.jp (Naoki HAMADA)
Subject: Re: How to discriminate between emacs and epoch.
In-Reply-To: hry@belial.osakac.ac.jp's message of 16 Oct 92 16: 24:09 JST
Message-ID: <NAO.92Oct17003516@mimo.jaist-east.ac.jp>
Lines: 23
Sender: news@jaist-east.ac.jp
Nntp-Posting-Host: mimo
Reply-To: nao@jaist-east.ac.jp
Organization: ME
References: <HRY.92Oct16162409@belial.osakac.ac.jp>
Date: Fri, 16 Oct 1992 15:35:16 GMT
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:3244
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=3244&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B$3$s$K$A$O!"KLN&@hC<Bg$NIMED$G$9!#(B

In article <HRY.92Oct16162409@belial.osakac.ac.jp> $B$_$J$_$N$5$s(B:
>$B>r7o$K1~$8$FI>2A$7$?$$%j%9%H$N%(%l%a%s%H$,J#?t8D$"$k>l9g$K!"(B

  $B$=$&$$$&;~$O!"(Bif $B$G$O$J$/!"M3=o@5$7$$(B cond $B$r;H$$$^$7$g$&"v(B

(cond ((CONDITION1)
       ($B$[$K$c(B))
      ((CONDITION2)
       ($B$O$K$c(B)
       ($B$[$K$c$i(B)
       ($B$[$K$c$i$+(B))
      (t ($B$[$2$[$2(B)))

$B$N$h$&$K!">r7o$K1~$8$FJ#?t$N<0$rI>2A$9$k$3$H$,$G$-$^$9!#0EL[$N(B progn 
$B$,;E9~$s$G$"$k$o$1$G$9$M!#:G8e$N(B (t (...)) $B$O%G%U%)%k%H$N>l9g$N=hM}$K(B
$B$J$k$o$1$G$9$,!"EvA3!"L5$/$F$b$+$^$$$^$;$s!#(B

  if $B$r;H$C$F=q$$$F$$$F!V$I$&$b$-$?$J$$$J$!!W$H;W$C$?$H$-$K$O!"(Bcond $B$r(B
$B;H$&$H$9$C$-$j=q$1$k$3$H$,$h$/$"$j$^$9$N$G!"$*;n$7$/$@$5$$$^$7!#(B

$BIMED(B $BD><y(B
