🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: gnu.emacs.bug
Article #99284

Backquote results in different behavior when byte-compiled

#99284
From: Michael L. Littman
Date: Tue, 09 Oct 1990 14:56
32 lines
1538 bytes
System: Sparc 18.55

 I am using a macro to generate a list which I then tamper with using
"setcar".  Before I byte-compile, "setcar" does not produce a
side-effect to the macro.  After I compile, it does.

 If I define the macro any other way, I get consistent results: either
"setcar" produces side-effects in the compiled version AND the
uncompiled version, or it "setcar" produces no side-effects in the
compiled version OR the uncompiled version.

; Program:

(defmacro nil-list ()
  (` (cons '(nil) nil)))

(defun change-nils (true)
  (let ((a (nil-list)))
    (if true
	(setcar (car a) 'up)
      )
    a))

; Test...

(change-nils t)  =>  ((up))
(change-nils nil) => ((nil))	; No side effect
(byte-compile 'change-nils)
(change-nils t) =>   ((up))
(change-nils nil) => ((up))	; Side effect

-Michael
Technical Details
Message-ID: <9010091456.AA18404@breeze.bellcore.com>
Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!decwrl!sdd.hp.com!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!tut.cis.ohio-state.edu!BREEZE.BELLCORE.COM!mlittman

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fb2f1,a0a6fd2e2502f1f9,start
X-Google-Attributes: gidfb2f1,public
X-Google-ArrivalTime: 1990-10-09 21:49:50 PST
Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!decwrl!sdd.hp.com!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!tut.cis.ohio-state.edu!BREEZE.BELLCORE.COM!mlittman
From: mlittman@BREEZE.BELLCORE.COM (Michael L. Littman)
Newsgroups: gnu.emacs.bug
Subject: Backquote results in different behavior when byte-compiled
Message-ID: <9010091456.AA18404@breeze.bellcore.com>
Date: 9 Oct 90 14:56:40 GMT
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 32
Posted: Tue Oct  9 15:56:40 1990