unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#13316: 24.2.50; defmacro might not return the last form, if it is nil
@ 2012-12-31  3:40 E Sabof
  2012-12-31 17:35 ` Drew Adams
  2012-12-31 19:22 ` Andreas Schwab
  0 siblings, 2 replies; 3+ messages in thread
From: E Sabof @ 2012-12-31  3:40 UTC (permalink / raw)
  To: 13316

[-- Attachment #1: Type: text/plain, Size: 189 bytes --]

If I write:
(defmacro test-macro () ''a nil)
(test-macro)

I get "a" as a result.

Tested with emacs -Q.
Emacs version: 24.2.50.1 (got it from development repository ~2 months ago)

Evgeni

[-- Attachment #2: Type: text/html, Size: 364 bytes --]

^ permalink raw reply	[flat|nested] 3+ messages in thread

* bug#13316: 24.2.50; defmacro might not return the last form, if it is nil
  2012-12-31  3:40 bug#13316: 24.2.50; defmacro might not return the last form, if it is nil E Sabof
@ 2012-12-31 17:35 ` Drew Adams
  2012-12-31 19:22 ` Andreas Schwab
  1 sibling, 0 replies; 3+ messages in thread
From: Drew Adams @ 2012-12-31 17:35 UTC (permalink / raw)
  To: 'E Sabof', 13316

> If I write:
> (defmacro test-macro () ''a nil)
> (test-macro)
>
> I get "a" as a result. 
>
> Tested with emacs -Q. 
> Emacs version: 24.2.50.1 (got it from development repository ~2 months ago)

This is a regression, BTW - it works correctly in Emacs 24.2.
Confirmed in this more recent version:

In GNU Emacs 24.3.50.1 (i386-mingw-nt5.1.2600)
 of 2012-12-18 on MS-W7-DANI
Bzr revision: 111265 eliz@gnu.org-20121218190556-x9wmq083vwecgu0f
Windowing system distributor `Microsoft Corp.', version 5.1.2600
Configured using:
 `configure --with-gcc (4.7) --no-opt --enable-checking --cflags
 -Ic:/emacs/libs/libXpm-3.5.10/include -Ic:/emacs/libs/libXpm-3.5.10/src
 -Ic:/emacs/libs/libpng-dev_1.4.3-1_win32/include
 -Ic:/emacs/libs/zlib-dev_1.2.5-2_win32/include
 -Ic:/emacs/libs/giflib-4.1.4-1-lib/include
 -Ic:/emacs/libs/jpeg-6b-4-lib/include
 -Ic:/emacs/libs/tiff-3.8.2-1-lib/include
 -Ic:/emacs/libs/libxml2-2.7.8-w32-bin/include/libxml2
 -Ic:/emacs/libs/gnutls-3.0.9-w32-bin/include
 -Ic:/emacs/libs/libiconv-1.9.2-1-lib/include'

(macroexpand '(test-macro)) returns (quote a).

However, with something non-nil in place of nil it DTRT:

(defmacro test-macro () ''a 45)
(test-macro)                ; 45
(macroexpand '(test-macro)) ; 45






^ permalink raw reply	[flat|nested] 3+ messages in thread

* bug#13316: 24.2.50; defmacro might not return the last form, if it is nil
  2012-12-31  3:40 bug#13316: 24.2.50; defmacro might not return the last form, if it is nil E Sabof
  2012-12-31 17:35 ` Drew Adams
@ 2012-12-31 19:22 ` Andreas Schwab
  1 sibling, 0 replies; 3+ messages in thread
From: Andreas Schwab @ 2012-12-31 19:22 UTC (permalink / raw)
  To: E Sabof; +Cc: 13316-done

Fixed on emacs-24.

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."





^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2012-12-31 19:22 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2012-12-31  3:40 bug#13316: 24.2.50; defmacro might not return the last form, if it is nil E Sabof
2012-12-31 17:35 ` Drew Adams
2012-12-31 19:22 ` Andreas Schwab

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

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 read-only IMAP folder(s) and NNTP newsgroup(s).