Hello Camm,
Stephen Wilson <[EMAIL PROTECTED]> writes:
> Camm Maguire <[EMAIL PROTECTED]> writes:
>
> > Greetings! Did you stop here?
> >
> > TopLevelDrawFunctions
> > Loading /fix/t1/camm/axiom/int/algebra/DRAWCFUN.nrlib/code for
> > package TopLevelDrawFunctionsForCompiledFunctions
> >
> > >> System error:
> >
> >
> > (1) -> cp: cannot stat `/fix/t1/camm/axiom/int/algebra/*.daase': No such
> > file or directory
> > make[3]: *** [/fix/t1/camm/axiom/mnt/linux/algebra/*.daase] Error 1
I believe this is the result of a GCL issue, but one I cant make heads
or tails of.
==----- test.lisp ----
(defun test (|ff| |f|)
(prog (|s| |r|)
(block nil
(setq |s| (funcall |ff| |f|))
(setq |r| (cdr |s|))
(cond ((< 1 |r|) 1)
((< |r| most-negative-long-float) most-positive-long-float)
(t |r|)))))
==--------------------
This is about as simple as I could get it. Note that one can change a
large number of items in the above form and the problem disappears.
For example, comment out one of the setq's, or rewrite
most-negative-long-float as most-positive-long-float.
steve:tmp> gcl
GCL (GNU Common Lisp) 2.7.0 ANSI Jul 12 2007 17:59:02
Source License: LGPL(gcl,gmp,pargcl), 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/
>(si::use-fast-links nil)
NIL
>(load (compile-file "test.lisp"))
;; Compiling test.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 test.o.
;; Loading /home/steve/tmp/test.o
Error:
Signalled by LOAD1.
INTERNAL-SIMPLE-READER-ERROR: Stream error on stream #<input stream
"/home/steve/tmp/test.o">: The default dispatch macro signalled an error.
Broken at LOAD1. Type :H for Help.
1 (Continue) Retry loading file NIL.
2 Retry loading file NIL.
3 Return to top level.
>>:bt
#0 LOAD1
{loc0=#P"/home/steve/tmp/test.o",loc1=t,loc2=nil,loc3=:error,loc4=nil,loc5=nil,l...}
[ihs=4]
#1 LOAD {pn=#P"/home/steve/tmp/test.o",args=(nil nil),loc2=(#<@0128AC00> nil
nil),loc3=(...} [ihs=3]
#2 EVAL {loc0=nil,loc1=nil,loc2=nil,loc3=#<compiled-function load>} [ihs=2]
>>
Thanks,
Steve
_______________________________________________
Gcl-devel mailing list
Gcl-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/gcl-devel
