[Gcl-devel] Re: compiler bug? segmentation violation produced by a one liner

[Camm Maguire]

Greetings, and thanks!  This should be fixed now.

Take care,

Robert Boyer <address@hidden> writes:

> Below is essentially ANSI test MAX.5, which causes a segmentation violation.
> It is also the reason that "make test-compiled" won't complete.
> 
> I do not know whether this might be a static issue.  What I do below is
> certainly done in a static-built image.
> 
> Bob
> 
> % xg
> GCL (GNU Common Lisp)  2.7.0 ANSI    Mar 15 2006 18:07:14
> Source License: LGPL(gcl,gmp,pargcl), GPL(unexec,bfd)
> 
> >(defun foo () (let ((m (max 2 1.0s0))) (or (eql m 2) (eql m 2.0s0))))
> 
> FOO
> 
> >(compile *)
> 
> ;; Compiling /tmp/gazonk_19269_0.lsp.
> ;; End of Pass 1.  
> ;; End of Pass 2.  
> /tmp/gazonk_19269_0.c:400: warning: `__huge_val' defined but not used
> ;; OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3, 
> (Debug quality ignored)
> ;; Finished compiling /tmp/gazonk_19269_0.o.
> Loading /tmp/gazonk_19269_0.o
> start address -T 0xab5ebb0 Finished loading /tmp/gazonk_19269_0.o
> #<compiled-function FOO>
> NIL
> NIL
> 
> >(foo)
> Segmentation violation: c stack ok:signalling error
> Error in EVAL [or a callee]: Caught fatal error [memory may be damaged]: 
> Segmentation violation.
> 
> Fast links are on: do (si::use-fast-links nil) for debugging
> Broken at CONDITIONS::CLCS-UNIVERSAL-ERROR-HANDLER.  Type :H for Help.
>  1 (Continue) Return to top level.
> dbl:>>
> 
> 
> 

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