Greetings, and thanks!
Just checked in a fix to cvs head.
Take care,
Tim Josling <[EMAIL PROTECTED]> writes:
> Here's a sample script that causes GCL to loop.
>
> echo "#|" >temp.lisp
> echo >>temp.lisp
> gcl -eval "(compile-file \"temp.lisp\")"
>
> Here's a console log
>
> /home2/gcb/gcb/gcc/gcc/gcb $>echo "#|" >temp.lisp
> /home2/gcb/gcb/gcc/gcc/gcb $>echo >>temp.lisp
> /home2/gcb/gcb/gcc/gcc/gcb $>gcl -eval "(compile-file \"temp.lisp\")"
> GCL (GNU Common Lisp) 2.6.7 CLtL1 Nov 10 2006 14:25:02
> Source License: LGPL(gcl,gmp), GPL(unexec,bfd,xgcl)
> Binary License: GPL due to GPL'ed components: (XGCL READLINE 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.
> Temporary directory for compiler files set to /tmp/
> Compiling temp.lisp.
>
> [...some time later...]
>
> Error: Console interrupt.
> Fast links are on: do (si::use-fast-links nil) for debugging
> Error signalled by READ.
> Broken at SYSTEM:TERMINAL-INTERRUPT. Type :H for Help.
> >>:b
> Backtrace: funcall > system:top-level > compile-file > block > tagbody >
> progn > setq > apply > apply > compiler::compile-file1 > let > unwind-protect
> > progn > let* > let > unwind-protect > progn > progn > let* > unwind-protect
> > do > read > SYSTEM:TERMINAL-INTERRUPT
> NIL
> >>:bt
>
> #0 READ {loc0=#<input stream
> "temp.lisp">,loc1=nil,loc2=(nil),loc3=nil,loc4=nil,loc5=#<r...} [ihs=25]
> #1 COMPILE-FILE1 {} [ihs=13]
> #2 APPLY {loc0=compiler::compile-file1,loc1=("temp.lisp"),loc2="temp.lisp"}
> [ihs=12]
> #3 APPLY {loc0=compiler::compile-file1,loc1=("temp.lisp")} [ihs=11]
> #4 COMPILE-FILE {} [ihs=6]
> #5 TOP-LEVEL {loc0=nil,loc1=nil,loc2=nil,loc3=(lambda-block compile-file
> (&rest compiler::arg...} [ihs=5]
> #6 FUNCALL {loc0=#<compiled-function
> system:top-level>,loc1=nil,loc2=0,loc3=0,loc4=nil,loc5...} [ihs=4]
> NIL
> >>(quit)
> /home2/gcb/gcb/gcc/gcc/gcb $>
>
> Regards,
> Tim Josling
>
>
>
> _______________________________________________
> Gcl-devel mailing list
> Gcl-devel@gnu.org
> http://lists.gnu.org/mailman/listinfo/gcl-devel
>
>
>
--
Camm Maguire [EMAIL PROTECTED]
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah
_______________________________________________
Gcl-devel mailing list
Gcl-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/gcl-devel
