[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Gcl-devel] (random tester) Compiler bug involving side effects in F
From: |
Camm Maguire |
Subject: |
Re: [Gcl-devel] (random tester) Compiler bug involving side effects in FLET |
Date: |
09 Oct 2003 22:42:51 -0400 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.2 |
Greetings, Paul, and thanks as always. Fixed in 2.6.1 and cvs HEAD.
Your turn :-)
Take care,
"Paul F. Dietz" <address@hidden> writes:
> -----
>
> (defparameter *f*
> '(lambda (a)
> (flet ((%f8 nil (setq a 0)))
> (let ((v9 a)) (- (%f8) v9)))))
>
> (print (funcall (compile nil *f*) 1)) ;; ==> 0 (incorrect)
> (print (funcall (eval `(function ,*f*)) 1)) ;; ==> -1 (correct)
>
> I'd guess V9 is being replaced with A inside the LET, which isn't
> correct here.
>
> -----
>
> Paul
>
>
>
> _______________________________________________
> Gcl-devel mailing list
> address@hidden
> http://mail.gnu.org/mailman/listinfo/gcl-devel
>
>
>
--
Camm Maguire address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah