[Gcl-devel] Re: dynamic-extent make-list initialization error?

[Camm Maguire]

Greetings and thanks!  Should be fixed now.  BTW are we done on the
after gbc hook?

Take care,

Robert Boyer <address@hidden> writes:

> I believe that the following transcript shows that a compiled,
> dynamic-extent, make-list is failing to initialize the elements of the list
> to the ANSI default nil.
> 
> Bob
> 
> -------------------------------------------------------------------------------
> 
> % g
> GCL (GNU Common Lisp)  2.7.0 ANSI    Dec  5 2005 09:13:38
> Source License: LGPL(gcl,gmp,pargcl), 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 foo () (let ((x (make-list 1))) (declare (dynamic-extent x)) (car x)))
> 
> FOO
> 
> >(foo)
> 
> NIL
> 
> >(compile 'foo)
> 
> ;; Compiling ./gazonk0.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 ./gazonk0.o.
> Loading /v/filer2/boyer/gazonk0.o
> start address -T 0xa09c680 Finished loading /v/filer2/boyer/gazonk0.o
> #<compiled-function FOO>
> NIL
> NIL
> 
> >(foo)
> 
> #<OBJNULL>
> 
> >
> 
> 
> 

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