From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/47210 Path: main.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.gnus.general Subject: Re: Gnus always loads cl Date: Wed, 16 Oct 2002 21:11:17 +0900 Organization: Emacsen advocacy group Sender: owner-ding@hpc.uh.edu Message-ID: References: <87u1jolt7k.fsf@crybaby.cs.uni-dortmund.de> <87adlgb3w7.fsf@crybaby.cs.uni-dortmund.de> <87hefnu7sn.fsf@crybaby.cs.uni-dortmund.de> <87k7kjwlik.fsf@crybaby.cs.uni-dortmund.de> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: main.gmane.org 1034770321 29299 80.91.224.249 (16 Oct 2002 12:12:01 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Wed, 16 Oct 2002 12:12:01 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 181n1r-0007cR-00 for ; Wed, 16 Oct 2002 14:11:59 +0200 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 181n1l-0001q6-00; Wed, 16 Oct 2002 07:11:53 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 16 Oct 2002 07:12:34 -0500 (CDT) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id HAA04770 for ; Wed, 16 Oct 2002 07:12:22 -0500 (CDT) Original-Received: (qmail 2967 invoked by alias); 16 Oct 2002 12:11:29 -0000 Original-Received: (qmail 2960 invoked from network); 16 Oct 2002 12:11:29 -0000 Original-Received: from unknown (HELO mars.web-hosting.com) (207.228.244.150) by gnus.org with SMTP; 16 Oct 2002 12:11:29 -0000 Original-Received: from localhost ([207.228.245.242]) by mars.web-hosting.com (8.11.1/8.11.1) with ESMTP id g9GCBRE16007 for ; Wed, 16 Oct 2002 08:11:27 -0400 (EDT) Original-To: ding@gnus.org Mail-Copies-To: never User-Agent: Gnus/5.090008 (Oort Gnus v0.08) XEmacs/21.4 (Military Intelligence (RC3), sparc-sun-solaris2.6) 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&( Cancel-Lock: sha1:s/ptVHn13SfcasVX5Ag7sCwAZOU= X-Hashcash: 021016:ding@gnus.org:1f335ca3197d7503 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:47210 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:47210 >>>>> In <87k7kjwlik.fsf@crybaby.cs.uni-dortmund.de> >>>>> Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Gro=DFjohann) 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... --=20 Katsumi Yamaoka