Greetings! I believe this is fixed now in cvs head. Working on a t5 cleanup tag.
Take care, Robert Boyer <[EMAIL PROTECTED]> writes: > t4 still has the bug about *split-files* (the overwriting of a file being > compiled)!!!!!! This comes up trying to run the nqthm-1992 tests. I'll > just repeat the bug report from a month ago cause it is just the same > problem, unchanged. > > Bob > > > ------------------------------------------------------------------------------- > > > >From boyer Sat Jul 9 17:02:05 -0500 2005 > To: [EMAIL PROTECTED] > Subject: strange bug > > Here is a strange bug report, a nasty interaction it seems between t3, gprof, > compiler::*split-files*, and compile-file. > > I give the very simple transcript below to reproduce the bug. > > The file foo.lisp mentioned is a *very* long file made with the Emacs command > > (let ((cnt 0)) > (while (< cnt 20000) > (insert (format "(defun foo%s (x) x)\n" cnt)) > (setq cnt (+ 1 cnt)))) > > but I suspect it could be any long file. Simply compiling that file, > foo.lisp, overwrites it with garbage. Not nice! > > Bob > > ------------------------------------------------------------------------------- > > % gcl-t3 > GCL (GNU Common Lisp) 2.7.0 CLtL1 profiling Jul 9 2005 12:48:16 > 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. > > >(setq compiler::*split-files* 200000) > > 200000 > > >(trace compile-file) > > Warning: COMPILE-FILE is being redefined. > (COMPILE-FILE) > > >(compile-file "foo.lisp") > > 1> (COMPILE-FILE "foo.lisp") > ;; Compiling foo.lisp. > ;; 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 0foo.o. > ;; Compiling foo.lisp. > ;; 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 1foo.o. > ;; Compiling foo.lisp. > ;; 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 2foo.o. > 2> (COMPILE-FILE #P"gazonk0.lsp" :OUTPUT-FILE "foo.lisp") > ;; 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 foo.lisp. > <2 (COMPILE-FILE #P"/v/filer2/boyer/nqthm-2nd/nqthm-1992/foo.lisp" > NIL NIL) > <1 (COMPILE-FILE #P"/v/filer2/boyer/nqthm-2nd/nqthm-1992/foo.lisp" > NIL NIL) > #P"/v/filer2/boyer/nqthm-2nd/nqthm-1992/foo.lisp" > NIL > NIL > > >% head foo.lisp > ELF > > I > > > > > > > ─ > > > -- Camm Maguire [EMAIL PROTECTED] ========================================================================== "The earth is but one country, and mankind its citizens." -- Baha'u'llah _______________________________________________ Gcl-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/gcl-devel
