[Gcl-devel] Re: compiler bug in 2.7.0

[Camm Maguire]

Greetings, and thanks!  I believe this is fixed in t4 -- please let me
know if not.

Take care,

Robert Boyer <address@hidden> writes:

> I believe that the following is a compiler bug in the newest 2.7.0.
> 
> In the following, I define the function fiddle and call it; as a result "HI"
> is printed.  Then I compile fiddle and call it, but "HI" is no longer
> printed.
> 
> Thanks,
> 
> Bob
> 
> % gcl-newest-ansi
> GCL (GNU Common Lisp)  2.7.0 ANSI    Jul 23 2005 12:04:01
> Source License: LGPL(gcl,gmp), GPL(unexec,bfd)
> Binary License:  GPL due to GPL'ed components: (BFD UNEXEC)
> Modifications of this banner must retain notice of a compatible license
> Dedicated to the memory of W. Schelter
> 
> Use (help) to get some basic information on how to use GCL.
> 
> >(defun fiddle (x) (assoc (prog1 x (print 'hi)) nil :test 'equal))
> 
> FIDDLE
> 
> >(fiddle 'b)
> 
> HI 
> NIL
> 
> >(compile 'fiddle)
> 
> ;; Compiling ./gazonk3.lsp.
> ;; End of Pass 1.  
> ;; End of Pass 2.  
> ;; OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3, 
> (Debug quality ignored)
> ;; Finished compiling ./gazonk3.o.
> Loading /v/filer2/boyer/nqthm-2nd/nqthm-1992/gazonk3.o
> start address -T 0x8c8d80 Finished loading 
> /v/filer2/boyer/nqthm-2nd/nqthm-1992/gazonk3.o
> #<compiled-function FIDDLE>
> NIL
> NIL
> 
> >(fiddle 'b)
> 
> NIL
> 
> >
> 
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah