[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gcl-devel] Re: [Axiom-developer] Re: 2.7 build

From: Stephen Wilson
Subject: [Gcl-devel] Re: [Axiom-developer] Re: 2.7 build
Date: 14 Jul 2007 16:14:14 -0400
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.4

Hello Camm,

Stephen Wilson <address@hidden> writes:

> Camm Maguire <address@hidden> 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)


>(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

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.

#0   LOAD1 
#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]


reply via email to

[Prev in Thread] Current Thread [Next in Thread]