From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Drew Adams Newsgroups: gmane.emacs.bugs Subject: bug#15296: 24.3.50; A macro object does not necessarily have `lambda' as its cadr Date: Fri, 6 Sep 2013 22:39:58 -0700 (PDT) Message-ID: <8d69314c-7324-4751-b7c2-ee1a26645afb@default> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1378532490 18201 80.91.229.3 (7 Sep 2013 05:41:30 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sat, 7 Sep 2013 05:41:30 +0000 (UTC) To: 15296@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sat Sep 07 07:41:31 2013 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1VIBGw-0006Lz-IO for geb-bug-gnu-emacs@m.gmane.org; Sat, 07 Sep 2013 07:41:26 +0200 Original-Received: from localhost ([::1]:40739 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBGw-0001tB-3Z for geb-bug-gnu-emacs@m.gmane.org; Sat, 07 Sep 2013 01:41:26 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:52962) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBGi-0001s8-Q4 for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:41:22 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VIBGY-0000On-Np for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:41:12 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:37429) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBGY-0000Oe-Jx for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:41:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1VIBGY-0006vL-DB for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:41:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Drew Adams Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 07 Sep 2013 05:41:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 15296 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.137853245326592 (code B ref -1); Sat, 07 Sep 2013 05:41:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 7 Sep 2013 05:40:53 +0000 Original-Received: from localhost ([127.0.0.1]:45722 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1VIBGO-0006un-VW for submit@debbugs.gnu.org; Sat, 07 Sep 2013 01:40:53 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:50840) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1VIBG7-0006uB-NG for submit@debbugs.gnu.org; Sat, 07 Sep 2013 01:40:36 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VIBFr-0008Ux-VK for submit@debbugs.gnu.org; Sat, 07 Sep 2013 01:40:30 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:41482) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBFr-0008Uo-SW for submit@debbugs.gnu.org; Sat, 07 Sep 2013 01:40:19 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:52306) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBFj-0001px-7L for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:40:19 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VIBFa-0008BR-B3 for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:40:11 -0400 Original-Received: from aserp1040.oracle.com ([141.146.126.69]:42825) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VIBFa-00087Y-2K for bug-gnu-emacs@gnu.org; Sat, 07 Sep 2013 01:40:02 -0400 Original-Received: from ucsinet22.oracle.com (ucsinet22.oracle.com [156.151.31.94]) by aserp1040.oracle.com (Sentrion-MTA-4.3.1/Sentrion-MTA-4.3.1) with ESMTP id r875dxJb011065 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=OK) for ; Sat, 7 Sep 2013 05:40:00 GMT Original-Received: from aserz7022.oracle.com (aserz7022.oracle.com [141.146.126.231]) by ucsinet22.oracle.com (8.14.4+Sun/8.14.4) with ESMTP id r875dxLK014282 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NO) for ; Sat, 7 Sep 2013 05:39:59 GMT Original-Received: from abhmt112.oracle.com (abhmt112.oracle.com [141.146.116.64]) by aserz7022.oracle.com (8.14.4+Sun/8.14.4) with ESMTP id r875dwSG022831 for ; Sat, 7 Sep 2013 05:39:58 GMT X-Priority: 3 X-Mailer: Oracle Beehive Extensions for Outlook 2.0.1.8 (707110) [OL 12.0.6680.5000 (x86)] X-Source-IP: ucsinet22.oracle.com [156.151.31.94] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.4.x-2.6.x [generic] X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:78085 Archived-At: AFAICT, (elisp) `Defining Macros' is the closest thing we have to doc telling you how to test whether a Lisp object is a macro. There is no `macro-p' predicate or similar in Emacs Lisp, unless I'm missing something. (Shouldn't there be?) Anyway, this Elisp manual node says that a macro is a list whose car is `macro' and whose `cdr' is a lambda expression. That's not true if the `defmacro' was byte-compiled. The macro is then a list whose car is `macro= ' but whose cdr is byte code, AFAICT. So this will not work, for example: (defun macro-p (obj) (and (fboundp obj) (let ((def (symbol-function obj))) (and (consp def) (eq (car def) 'macro) (eq (cadr def) 'lambda))))) In GNU Emacs 24.3.50.1 (i686-pc-mingw32) of 2013-08-23 on ODIEONE Bzr revision: 113986 rgm@gnu.org-20130823185841-zoy6h1qk433ibrlf Windowing system distributor `Microsoft Corp.', version 6.1.7601 Configured using: `configure --prefix=3D/c/Devel/emacs/binary --enable-checking=3Dyes,glyphs 'CFLAGS=3D-O0 -g3' LDFLAGS=3D-Lc:/Devel/emacs/lib CPPFLAGS=3D-Ic:/Devel/emacs/include'