From: Katsumi Yamaoka <yamaoka@jpl.org>
Subject: Re: Gnus always loads cl
Date: Wed, 16 Oct 2002 21:11:17 +0900 [thread overview]
Message-ID: <yotl3cr6mvmi.fsf@jpl.org> (raw)
In-Reply-To: <87k7kjwlik.fsf@crybaby.cs.uni-dortmund.de>
>>>>> In <87k7kjwlik.fsf@crybaby.cs.uni-dortmund.de>
>>>>> Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) wrote:
Kai> Well. Hm. How to make it prettier? Maybe this one:
Kai> (when (memq nil (mapcar 'fboundp
Kai> '(gethash hash-table make-hash-table
Kai> mapc puthash)))
Kai> (require 'cl)
Kai> (unless (fboundp 'puthash)
Kai> (defalias 'puthash 'cl-puthash)))
That's more smart. I'll use it. Thanks.
[...]
Kai> As a zero-th approximation, any function that is not fboundp in Emacs
Kai> 20 will do. Maybe make-hash-table is the most basic function.
Kai> (Without a hash table, you cannot do anything with it, so any Emacs
Kai> which provides hash tables will also provide make-hash-table, I
Kai> guess.)
The built-in function make-hash-table has appeared in Emacs 21.1.
Emacs 18 didn't provide it. cl-extra.el provided it till Emacs
20. I had been knowing `(make-vector 2^N-1 0)' for some time,
on the one hand.
By the way, I found the past things. In Gnus 5.3 which is
bundled with Emacs 19.34, gnus-gl.el uses make-hash-table.
gnus-gl.el and nnml.el require cl in the toplevel. ;-)
>> By the way, I've made gnus-clfns.el in T-gnus...
>> ...That file
>> provides compiler macros for cl run-time functions as it is done
>> by dgnushack.el in Oort Gnus. If such demand increases, we
>> should probably do the same thing also in Oort Gnus.
Kai> Whee. dgnushack is really weird. But if it's necessary...
Developers who don't have Emacs 20 will increase from now on.
We probably have to decide some time. It might be now...
--
Katsumi Yamaoka <yamaoka@jpl.org>
next prev parent reply other threads:[~2002-10-16 12:11 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-10-08 11:24 Katsumi Yamaoka
2002-10-10 11:12 ` Katsumi Yamaoka
2002-10-14 9:15 ` Katsumi Yamaoka
2002-10-14 19:24 ` Kai Großjohann
2002-10-14 22:46 ` Katsumi Yamaoka
2002-10-15 6:41 ` Kai Großjohann
2002-10-15 9:29 ` Katsumi Yamaoka
2002-10-15 13:54 ` Kai Großjohann
2002-10-15 15:46 ` Katsumi
2002-10-15 19:27 ` Kai Großjohann
2002-10-16 12:11 ` Katsumi Yamaoka [this message]
2002-10-15 21:34 ` Alex Schroeder
2002-12-29 0:18 ` Lars Magne Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=yotl3cr6mvmi.fsf@jpl.org \
--to=yamaoka@jpl.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).