bug_report() gives "Maxima encountered a Lisp error"



On Wed, Oct 06, 2004 at 10:34:40AM -0400, Camm Maguire wrote:
> Greetings, and thanks!  Can you please do one more:
> 
> maxima
> (%i1) :lisp (si::sgc-on)
> ...
> (%i2) :lisp (si::use-fast-links nil)
> ...
> (%i3) :lisp (setq *debugger-hook* nil)
> ...
> (%i4) bug_report();
> ...
> :bt
> 
> Take care,
> 
> -- 
> Camm Maguire			     			camm@enhanced.com
> ==========================================================================
> "The earth is but one country, and mankind its citizens."  --  Baha'u'llah



Here it is:

(%i1) :lisp (si::sgc-on)

NIL
(%i1) :lisp (si::use-fast-links nil)

NIL
(%i1) :lisp (setq *debugger-hook* nil) 

NIL
(%i1)  bug_report();


The Maxima bug database is available at
    http://sourceforge.net/tracker/?atid=104933&group_id=4933&func=browse
Submit bug reports by following the 'Submit New' link on that page.
Please include the following build information with your bug report:
-------------------------------------------------------------

Maxima version: 5.9.1
Error in MEVAL1 [or a callee]: Caught fatal error [memory may be damaged]

Broken at CONDITIONS:INVOKE-DEBUGGER.  Type :H for Help.
 1 (Abort) Return to top level.
dbl:MAXIMA>>:bt

#0   INVOKE-DEBUGGER {datum=#<conditions::internal-simple-stream-error.0>,arguments=nil,loc2=#<condit...} [ihs=15]
#1   ERROR {datum=conditions::internal-simple-stream-error,arguments=(:function-name meval1...} [ihs=14]
#2   CLCS-UNIVERSAL-ERROR-HANDLER {error-name=:error,correctable=nil,function-name=meval1,continue-format-string=(...} [ihs=13]
#3   $BUILD_INFO {loc0=t,loc1="Maxima build date: ~a:~a ~a/~a/~a~%",loc2="5.9.1",loc3=t,loc4=nil,...} [ihs=12]
#4   MEVAL1 {form=(($bug_report)),loc1=nil,loc2=nil,aryp=nil,loc4=$bug_report,loc5=nil,loc6=...} [ihs=11]
#5   MEVAL {form=(($bug_report)),loc1=#<synonym stream to *terminal-io*>} [ihs=10]
#6   MEVAL* {loc0=(($bug_report)),loc1=6,loc2=(nil),loc3=(lisp-eval (setq *debugger-hook* ni...} [ihs=9]
#7   MACSYMA-TOP-LEVEL {} [ihs=8]
#8   RUN {} [ihs=4]
#9   SET-UP-TOP-LEVEL {loc0=nil,loc1=nil,loc2=nil,loc3=(lambda-block run nil ...)} [ihs=3]
#10   GCL-TOP-LEVEL {loc0=((system::tem nil)),loc1=nil,loc2=((system::gcl-top-level block #<@091B7FE...} [ihs=2]
NIL
dbl:MAXIMA>>