๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.editor.mule
Article #726

Re: Q substitute 'unless' and 'when' easily ?

#726
From: Katsumi Yamaoka
Date: Tue, 09 Mar 1999 00:00
35 lines
2826 bytes
>>>>> In <svBTh.yoshimi@etl.go.jp> 
>>>>>	yoshimi@etl.go.jp (Takashi YOSHIMI) wrote:

ๅ‰่ฆ‹ใ•ใ‚“> mule 2.3 (emacs-19.28.1) ใ‚’ไฝฟใฃใฆใ„ใพใ™ใ€‚

ๅ‰่ฆ‹ใ•ใ‚“> ๆœ€ๆ–ฐใฎemacs-20.3 ใฎใ‚ขใƒผใ‚ซใ‚คใƒ–ใซๅ…ฅใฃใฆใ„ใŸlisp ใƒ•ใ‚กใ‚คใƒซใ‚’ไธ€ใค
ๅ‰่ฆ‹ใ•ใ‚“> ใ ใ‘ๅผ•ใฃๅผตใ‚Šๅ‡บใ—ใฆไฝฟใฃใฆ่ฆ‹ใ‚ˆใ†ใจใ—ใŸใฎใงใ™ใŒใ€ใ‚ณใƒผใƒ‰ใฎไธญใซ 
ๅ‰่ฆ‹ใ•ใ‚“> 'unless' ใ‚„ 'when' ใŒใ‚ใฃใฆใ€ใ‚จใƒฉใƒผใŒๅ‡บใฆใ—ใพใ„ใพใ—ใŸใ€‚
ๅ‰่ฆ‹ใ•ใ‚“> ่ฉฆใ—ใซใ€emacs-19.34b ใ‚‚่ชฟในใฆใฟใŸใฎใงใ™ใŒใ€ใ“ใ‚Œใฏ 19.28.1ใจ
ๅ‰่ฆ‹ใ•ใ‚“> ๅŒใ˜ใƒใƒผใ‚ธใƒงใƒณใงใ—ใŸใ€‚

ๅ‰่ฆ‹ใ•ใ‚“> mule2.3 ใง intro ใ‚’่ฆ‹ใ‚‹ใจใ€CL ใฎ้ …็›ฎใฎไธ‹ใซใ“ใ‚Œใ‚‰ใฎๅˆถๅพกใ‚ณใƒžใƒณ
ๅ‰่ฆ‹ใ•ใ‚“> ใƒ‰ใฏๆ›ธใ‹ใ‚Œใฆใ„ใ‚‹ใฎใงใ™ใŒใ€ๅฎŸ้š›ใซใฏไฝฟใˆใชใ„ใ‚ˆใ†ใงใ™ใ€‚ใใ“ใซใฏใ€
ๅ‰่ฆ‹ใ•ใ‚“> if ใ‚’ไฝฟใฃใŸ็ฝฎใๆ›ใˆๆ–นใ‚‚ๆ›ธใ‹ใ‚Œใฆใ„ใŸใฎใงใ™ใŒใ€็พๅฎŸๅ•้กŒใจใ—ใฆ
ๅ‰่ฆ‹ใ•ใ‚“> ใใ‚Œใ‚‰ใ‚’ใ™ในใฆ็ฝฎใๆ›ใˆใ‚‹ใฎใฏๅคงๅค‰ใงใ™ใ€‚

ไฝฟใˆใชใ„ใ“ใจใฏใชใ„ใจๆ€ใ†ใฎใงใ™ใŒใ€‚

ๅ‰่ฆ‹ใ•ใ‚“> ใใ“ใงใ€่ณชๅ•ใชใฎใงใ™ใŒใ€mule 2.3 ใง unless ใ‚„ when ใฎๆททใ˜ใฃ
ๅ‰่ฆ‹ใ•ใ‚“> ใŸใƒชใ‚นใƒ—ใ‚ณใƒผใƒ‰ใ‚’ๅฎŸ่กŒใ™ใ‚‹ใŸใ‚ใซใ€ไฝ•ใ‹ใƒ•ใ‚ฃใƒซใ‚ฟใ‹ใฎใ‚ˆใ†ใชใ‚‚ใฎใฏ
ๅ‰่ฆ‹ใ•ใ‚“> ใ‚ใ‚‹ใฎใงใ—ใ‚‡ใ†ใ‹๏ผŸ

el ใƒ•ใ‚กใ‚คใƒซใฎๅ†’้ ญใซ

(eval-when-compile (require 'cl))

ใจๆ›ธใ„ใฆ byte-compile ใ™ใ‚Œใฐ OK ใ ใจๆ€ใ„ใพใ™ใ€‚
ใ“ใ‚Œ็„กใ—ใง byte-compile ใ™ใ‚‹ใจ unless ใ‚„ when ใŒ macro ใงใฏใชใใฆ้–ขๆ•ฐ
ใจใ—ใฆ byte code ใŒ็”Ÿๆˆใ•ใ‚Œใฆใ—ใพใฃใฆใ„ใพใ™ใ‹ใ‚‰ใ€ใใ†ใ„ใ†ใ‚‚ใฎใ‚’ๆ•‘ๆธˆใ™
ใ‚‹ๆ‰‹็ซ‹ใฆใฏใ‚ใ‚Šใพใ›ใ‚“ใ€‚

ใใ‚Œใฏใจใ‚‚ใ‹ใใ€20.3 ็”จใฎ el ใ‚’ใใฎใพใพ 19.28 ใงไฝฟใˆใŸใจใ™ใ‚Œใฐใ€ใ‹ใชใ‚Š
้‹ใŒ่‰ฏใ„ใ“ใจใ ใจใฏๆ€ใ„ใพใ™ใ‚ˆใ€‚:-p
-- 
Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
Technical Details
Message-ID: <28r9qz6rsj.fsf@kchisa.ga.sony.co.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <svBTh.yoshimi@etl.go.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 10eba4,135d496b62a50382
X-Google-Attributes: gid10eba4,public
From: Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
Subject: Re: Q substitute 'unless' and 'when' easily ?
Date: 1999/03/09
Message-ID: <28r9qz6rsj.fsf@kchisa.ga.sony.co.jp>
X-Deja-AN: 452887987
References: <svBTh.yoshimi@etl.go.jp>
Content-Type: text/plain; charset=ISO-2022-JP
X-News-System: INN 1.7.2/innfeed 0.10.1
X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&(
Organization: Personal A&V Products Company, Sony Corporation, Tokyo, Japan.
Mime-Version: 1.0 (generated by WEMI 1.13.3 - "Yaizu")
User-Agent: Semi-gnus/6.10.10 WEMI/1.13.3 (Yaizu) FLIM/1.12.6 (Family-Kลenmae) MULE XEmacs/21.2 (beta12) (Clio) (sparc-sun-solaris2.6)
Cancel-Lock: sha1:xdjVWm8EuiI4yutbJkfXMykvTX4=
X-PGP-Sig: 5.0i Subject,Message-ID,Date,From,User-Agent,X-Face iQA/AwUBNuTOzeUtm6WIDG/UEQJ9rwCgnDSq+Lpg3Ij4PaQhCMHiyzpZDFUAmgL3 jGDPgoeG6Gh9m5ZhD8Mepfc1 =fGLH
Newsgroups: fj.editor.mule