From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/76723 Path: news.gmane.org!not-for-mail From: Andreas Schwab Newsgroups: gmane.emacs.gnus.general Subject: Re: tzz-auth-source-rewrite branch Date: Mon, 14 Feb 2011 18:58:05 +0100 Message-ID: References: <87ei7nivte.fsf@lifelogs.com> <87zkq9tdi7.fsf_-_@lifelogs.com> <87mxm9ytyn.fsf@gnus.org> <87lj1rvafs.fsf@lifelogs.com> <877hd3fg5x.fsf@gnus.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1297706324 19339 80.91.229.12 (14 Feb 2011 17:58:44 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 14 Feb 2011 17:58:44 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M25065@lists.math.uh.edu Mon Feb 14 18:58:38 2011 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Pp2h4-0003ab-9p for ding-account@gmane.org; Mon, 14 Feb 2011 18:58:38 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1Pp2gg-0002cG-NR; Mon, 14 Feb 2011 11:58:14 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1Pp2ge-0002by-O2 for ding@lists.math.uh.edu; Mon, 14 Feb 2011 11:58:12 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtp (Exim 4.72) (envelope-from ) id 1Pp2ga-0004GS-4w for ding@lists.math.uh.edu; Mon, 14 Feb 2011 11:58:12 -0600 Original-Received: from mail-out.m-online.net ([212.18.0.10]) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1Pp2gY-0006gj-QO for ding@gnus.org; Mon, 14 Feb 2011 18:58:06 +0100 Original-Received: from frontend1.mail.m-online.net (frontend1.mail.intern.m-online.net [192.168.8.180]) by mail-out.m-online.net (Postfix) with ESMTP id 71800188A188 for ; Mon, 14 Feb 2011 18:58:06 +0100 (CET) Original-Received: from localhost (dynscan1.mnet-online.de [192.168.8.164]) by mail.m-online.net (Postfix) with ESMTP id 6A12B1C000F9 for ; Mon, 14 Feb 2011 18:58:06 +0100 (CET) X-Virus-Scanned: amavisd-new at mnet-online.de Original-Received: from mail.mnet-online.de ([192.168.8.180]) by localhost (dynscan1.mail.m-online.net [192.168.8.164]) (amavisd-new, port 10024) with ESMTP id 7RrU884THukQ for ; Mon, 14 Feb 2011 18:58:05 +0100 (CET) Original-Received: from igel.home (ppp-88-217-124-231.dynamic.mnet-online.de [88.217.124.231]) by mail.mnet-online.de (Postfix) with ESMTP for ; Mon, 14 Feb 2011 18:58:05 +0100 (CET) Original-Received: by igel.home (Postfix, from userid 501) id 7D8A2CA2A0; Mon, 14 Feb 2011 18:58:05 +0100 (CET) X-Yow: Are you still SEXUALLY ACTIVE? Did you BRING th' REINFORCEMENTS? In-Reply-To: <877hd3fg5x.fsf@gnus.org> (Lars Ingebrigtsen's message of "Sun, 13 Feb 2011 19:28:42 -0800") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2.93 (gnu/linux) X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:76723 Archived-At: Lars Ingebrigtsen writes: > The cl macros are virtually unreadable since they use such weird > old-stylee forms, but I think this is the gist of the assert macro: > > (list 'progn > (list 'or form > (if string > (list* 'error string (append sargs args))))) > > Rewritten to modern macrology, that would be something like: `(progn (or ,form ,(if string `(error ,string ,@sargs ,@args)))) Andreas. -- Andreas Schwab, schwab@linux-m68k.org GPG Key fingerprint = 58CA 54C7 6D53 942B 1756 01D3 44D5 214B 8276 4ED5 "And now for something completely different."