[lisplab-cvs] r144 - in trunk: . shared/slatec shared/slatec/src src/core

Jørn Inge Vestgården jivestgarden at common-lisp.net
Sun Mar 21 10:36:18 UTC 2010 

Author: jivestgarden
Date: Sun Mar 21 06:36:17 2010
New Revision: 144

Log:
hopefully fixed slatec compilation problem

Added:
   trunk/shared/slatec/src/d9aimp.lisp
      - copied unchanged from r141, /trunk/shared/slatec/d9aimp.lisp
   trunk/shared/slatec/src/d9b0mp.lisp
      - copied unchanged from r141, /trunk/shared/slatec/d9b0mp.lisp
   trunk/shared/slatec/src/d9b1mp.lisp
      - copied unchanged from r141, /trunk/shared/slatec/d9b1mp.lisp
   trunk/shared/slatec/src/d9lgmc.lisp
      - copied unchanged from r141, /trunk/shared/slatec/d9lgmc.lisp
   trunk/shared/slatec/src/d9upak.lisp
      - copied unchanged from r141, /trunk/shared/slatec/d9upak.lisp
   trunk/shared/slatec/src/dai.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dai.lisp
   trunk/shared/slatec/src/daie.lisp
      - copied unchanged from r141, /trunk/shared/slatec/daie.lisp
   trunk/shared/slatec/src/dasyik.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dasyik.lisp
   trunk/shared/slatec/src/dasyjy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dasyjy.lisp
   trunk/shared/slatec/src/dbesi.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesi.lisp
   trunk/shared/slatec/src/dbesi0.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesi0.lisp
   trunk/shared/slatec/src/dbesi1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesi1.lisp
   trunk/shared/slatec/src/dbesj.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesj.lisp
   trunk/shared/slatec/src/dbesj0.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesj0.lisp
   trunk/shared/slatec/src/dbesj1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesj1.lisp
   trunk/shared/slatec/src/dbesk.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesk.lisp
   trunk/shared/slatec/src/dbesk0.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesk0.lisp
   trunk/shared/slatec/src/dbesk1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesk1.lisp
   trunk/shared/slatec/src/dbesy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesy.lisp
   trunk/shared/slatec/src/dbesy0.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesy0.lisp
   trunk/shared/slatec/src/dbesy1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbesy1.lisp
   trunk/shared/slatec/src/dbi.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbi.lisp
   trunk/shared/slatec/src/dbie.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbie.lisp
   trunk/shared/slatec/src/dbsi0e.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsi0e.lisp
   trunk/shared/slatec/src/dbsi1e.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsi1e.lisp
   trunk/shared/slatec/src/dbsk0e.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsk0e.lisp
   trunk/shared/slatec/src/dbsk1e.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsk1e.lisp
   trunk/shared/slatec/src/dbsknu.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsknu.lisp
   trunk/shared/slatec/src/dbsynu.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dbsynu.lisp
   trunk/shared/slatec/src/dcsevl.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dcsevl.lisp
   trunk/shared/slatec/src/de1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/de1.lisp
   trunk/shared/slatec/src/dei.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dei.lisp
   trunk/shared/slatec/src/derf.lisp
      - copied unchanged from r141, /trunk/shared/slatec/derf.lisp
   trunk/shared/slatec/src/derfc.lisp
      - copied unchanged from r141, /trunk/shared/slatec/derfc.lisp
   trunk/shared/slatec/src/dgamlm.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dgamlm.lisp
   trunk/shared/slatec/src/dgamln.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dgamln.lisp
   trunk/shared/slatec/src/dgamma.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dgamma.lisp
   trunk/shared/slatec/src/dgtsl.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dgtsl.lisp
   trunk/shared/slatec/src/djairy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/djairy.lisp
   trunk/shared/slatec/src/dlngam.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dlngam.lisp
   trunk/shared/slatec/src/dqag.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqag.lisp
   trunk/shared/slatec/src/dqage.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqage.lisp
   trunk/shared/slatec/src/dqagi.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqagi.lisp
   trunk/shared/slatec/src/dqagie.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqagie.lisp
   trunk/shared/slatec/src/dqagpe.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqagpe.lisp
   trunk/shared/slatec/src/dqags.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqags.lisp
   trunk/shared/slatec/src/dqagse.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqagse.lisp
   trunk/shared/slatec/src/dqawc.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawc.lisp
   trunk/shared/slatec/src/dqawce.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawce.lisp
   trunk/shared/slatec/src/dqawf.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawf.lisp
   trunk/shared/slatec/src/dqawfe.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawfe.lisp
   trunk/shared/slatec/src/dqawo.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawo.lisp
   trunk/shared/slatec/src/dqawoe.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawoe.lisp
   trunk/shared/slatec/src/dqaws.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqaws.lisp
   trunk/shared/slatec/src/dqawse.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqawse.lisp
   trunk/shared/slatec/src/dqc25c.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqc25c.lisp
   trunk/shared/slatec/src/dqc25f.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqc25f.lisp
   trunk/shared/slatec/src/dqc25s.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqc25s.lisp
   trunk/shared/slatec/src/dqcheb.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqcheb.lisp
   trunk/shared/slatec/src/dqelg.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqelg.lisp
   trunk/shared/slatec/src/dqk15.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk15.lisp
   trunk/shared/slatec/src/dqk15i.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk15i.lisp
   trunk/shared/slatec/src/dqk15w.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk15w.lisp
   trunk/shared/slatec/src/dqk21.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk21.lisp
   trunk/shared/slatec/src/dqk31.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk31.lisp
   trunk/shared/slatec/src/dqk41.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk41.lisp
   trunk/shared/slatec/src/dqk51.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk51.lisp
   trunk/shared/slatec/src/dqk61.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqk61.lisp
   trunk/shared/slatec/src/dqmomo.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqmomo.lisp
   trunk/shared/slatec/src/dqng.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqng.lisp
   trunk/shared/slatec/src/dqpsrt.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqpsrt.lisp
   trunk/shared/slatec/src/dqwgtc.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqwgtc.lisp
   trunk/shared/slatec/src/dqwgtf.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqwgtf.lisp
   trunk/shared/slatec/src/dqwgts.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dqwgts.lisp
   trunk/shared/slatec/src/dspenc.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dspenc.lisp
   trunk/shared/slatec/src/dyairy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/dyairy.lisp
   trunk/shared/slatec/src/fdump.lisp
      - copied unchanged from r141, /trunk/shared/slatec/fdump.lisp
   trunk/shared/slatec/src/initds.lisp
      - copied unchanged from r141, /trunk/shared/slatec/initds.lisp
   trunk/shared/slatec/src/j4save.lisp
      - copied unchanged from r141, /trunk/shared/slatec/j4save.lisp
   trunk/shared/slatec/src/script.sh
      - copied unchanged from r141, /trunk/shared/slatec/script.sh
   trunk/shared/slatec/src/xercnt.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xercnt.lisp
   trunk/shared/slatec/src/xerhlt.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xerhlt.lisp
   trunk/shared/slatec/src/xermsg.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xermsg.lisp
   trunk/shared/slatec/src/xerprn.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xerprn.lisp
   trunk/shared/slatec/src/xersve.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xersve.lisp
   trunk/shared/slatec/src/xgetua.lisp
      - copied unchanged from r141, /trunk/shared/slatec/xgetua.lisp
   trunk/shared/slatec/src/zabs.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zabs.lisp
   trunk/shared/slatec/src/zacai.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zacai.lisp
   trunk/shared/slatec/src/zacon.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zacon.lisp
   trunk/shared/slatec/src/zairy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zairy.lisp
   trunk/shared/slatec/src/zasyi.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zasyi.lisp
   trunk/shared/slatec/src/zbesh.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbesh.lisp
   trunk/shared/slatec/src/zbesi.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbesi.lisp
   trunk/shared/slatec/src/zbesj.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbesj.lisp
   trunk/shared/slatec/src/zbesk.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbesk.lisp
   trunk/shared/slatec/src/zbesy.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbesy.lisp
   trunk/shared/slatec/src/zbinu.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbinu.lisp
   trunk/shared/slatec/src/zbiry.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbiry.lisp
   trunk/shared/slatec/src/zbknu.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbknu.lisp
   trunk/shared/slatec/src/zbuni.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbuni.lisp
   trunk/shared/slatec/src/zbunk.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zbunk.lisp
   trunk/shared/slatec/src/zdiv.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zdiv.lisp
   trunk/shared/slatec/src/zexp.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zexp.lisp
   trunk/shared/slatec/src/zkscl.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zkscl.lisp
   trunk/shared/slatec/src/zlog.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zlog.lisp
   trunk/shared/slatec/src/zmlri.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zmlri.lisp
   trunk/shared/slatec/src/zmlt.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zmlt.lisp
   trunk/shared/slatec/src/zrati.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zrati.lisp
   trunk/shared/slatec/src/zs1s2.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zs1s2.lisp
   trunk/shared/slatec/src/zseri.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zseri.lisp
   trunk/shared/slatec/src/zshch.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zshch.lisp
   trunk/shared/slatec/src/zsqrt.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zsqrt.lisp
   trunk/shared/slatec/src/zuchk.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zuchk.lisp
   trunk/shared/slatec/src/zunhj.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zunhj.lisp
   trunk/shared/slatec/src/zuni1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zuni1.lisp
   trunk/shared/slatec/src/zuni2.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zuni2.lisp
   trunk/shared/slatec/src/zunik.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zunik.lisp
   trunk/shared/slatec/src/zunk1.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zunk1.lisp
   trunk/shared/slatec/src/zunk2.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zunk2.lisp
   trunk/shared/slatec/src/zuoik.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zuoik.lisp
   trunk/shared/slatec/src/zwrsk.lisp
      - copied unchanged from r141, /trunk/shared/slatec/zwrsk.lisp
Removed:
   trunk/shared/slatec/d9aimp.lisp
   trunk/shared/slatec/d9b0mp.lisp
   trunk/shared/slatec/d9b1mp.lisp
   trunk/shared/slatec/d9lgmc.lisp
   trunk/shared/slatec/d9upak.lisp
   trunk/shared/slatec/dai.lisp
   trunk/shared/slatec/daie.lisp
   trunk/shared/slatec/dasyik.lisp
   trunk/shared/slatec/dasyjy.lisp
   trunk/shared/slatec/dbesi.lisp
   trunk/shared/slatec/dbesi0.lisp
   trunk/shared/slatec/dbesi1.lisp
   trunk/shared/slatec/dbesj.lisp
   trunk/shared/slatec/dbesj0.lisp
   trunk/shared/slatec/dbesj1.lisp
   trunk/shared/slatec/dbesk.lisp
   trunk/shared/slatec/dbesk0.lisp
   trunk/shared/slatec/dbesk1.lisp
   trunk/shared/slatec/dbesy.lisp
   trunk/shared/slatec/dbesy0.lisp
   trunk/shared/slatec/dbesy1.lisp
   trunk/shared/slatec/dbi.lisp
   trunk/shared/slatec/dbie.lisp
   trunk/shared/slatec/dbsi0e.lisp
   trunk/shared/slatec/dbsi1e.lisp
   trunk/shared/slatec/dbsk0e.lisp
   trunk/shared/slatec/dbsk1e.lisp
   trunk/shared/slatec/dbsknu.lisp
   trunk/shared/slatec/dbsynu.lisp
   trunk/shared/slatec/dcsevl.lisp
   trunk/shared/slatec/de1.lisp
   trunk/shared/slatec/dei.lisp
   trunk/shared/slatec/derf.lisp
   trunk/shared/slatec/derfc.lisp
   trunk/shared/slatec/dgamlm.lisp
   trunk/shared/slatec/dgamln.lisp
   trunk/shared/slatec/dgamma.lisp
   trunk/shared/slatec/dgtsl.lisp
   trunk/shared/slatec/djairy.lisp
   trunk/shared/slatec/dlngam.lisp
   trunk/shared/slatec/dqag.lisp
   trunk/shared/slatec/dqage.lisp
   trunk/shared/slatec/dqagi.lisp
   trunk/shared/slatec/dqagie.lisp
   trunk/shared/slatec/dqagpe.lisp
   trunk/shared/slatec/dqags.lisp
   trunk/shared/slatec/dqagse.lisp
   trunk/shared/slatec/dqawc.lisp
   trunk/shared/slatec/dqawce.lisp
   trunk/shared/slatec/dqawf.lisp
   trunk/shared/slatec/dqawfe.lisp
   trunk/shared/slatec/dqawo.lisp
   trunk/shared/slatec/dqawoe.lisp
   trunk/shared/slatec/dqaws.lisp
   trunk/shared/slatec/dqawse.lisp
   trunk/shared/slatec/dqc25c.lisp
   trunk/shared/slatec/dqc25f.lisp
   trunk/shared/slatec/dqc25s.lisp
   trunk/shared/slatec/dqcheb.lisp
   trunk/shared/slatec/dqelg.lisp
   trunk/shared/slatec/dqk15.lisp
   trunk/shared/slatec/dqk15i.lisp
   trunk/shared/slatec/dqk15w.lisp
   trunk/shared/slatec/dqk21.lisp
   trunk/shared/slatec/dqk31.lisp
   trunk/shared/slatec/dqk41.lisp
   trunk/shared/slatec/dqk51.lisp
   trunk/shared/slatec/dqk61.lisp
   trunk/shared/slatec/dqmomo.lisp
   trunk/shared/slatec/dqng.lisp
   trunk/shared/slatec/dqpsrt.lisp
   trunk/shared/slatec/dqwgtc.lisp
   trunk/shared/slatec/dqwgtf.lisp
   trunk/shared/slatec/dqwgts.lisp
   trunk/shared/slatec/dspenc.lisp
   trunk/shared/slatec/dyairy.lisp
   trunk/shared/slatec/fdump.lisp
   trunk/shared/slatec/initds.lisp
   trunk/shared/slatec/j4save.lisp
   trunk/shared/slatec/script.sh
   trunk/shared/slatec/xercnt.lisp
   trunk/shared/slatec/xerhlt.lisp
   trunk/shared/slatec/xermsg.lisp
   trunk/shared/slatec/xerprn.lisp
   trunk/shared/slatec/xersve.lisp
   trunk/shared/slatec/xgetua.lisp
   trunk/shared/slatec/zabs.lisp
   trunk/shared/slatec/zacai.lisp
   trunk/shared/slatec/zacon.lisp
   trunk/shared/slatec/zairy.lisp
   trunk/shared/slatec/zasyi.lisp
   trunk/shared/slatec/zbesh.lisp
   trunk/shared/slatec/zbesi.lisp
   trunk/shared/slatec/zbesj.lisp
   trunk/shared/slatec/zbesk.lisp
   trunk/shared/slatec/zbesy.lisp
   trunk/shared/slatec/zbinu.lisp
   trunk/shared/slatec/zbiry.lisp
   trunk/shared/slatec/zbknu.lisp
   trunk/shared/slatec/zbuni.lisp
   trunk/shared/slatec/zbunk.lisp
   trunk/shared/slatec/zdiv.lisp
   trunk/shared/slatec/zexp.lisp
   trunk/shared/slatec/zkscl.lisp
   trunk/shared/slatec/zlog.lisp
   trunk/shared/slatec/zmlri.lisp
   trunk/shared/slatec/zmlt.lisp
   trunk/shared/slatec/zrati.lisp
   trunk/shared/slatec/zs1s2.lisp
   trunk/shared/slatec/zseri.lisp
   trunk/shared/slatec/zshch.lisp
   trunk/shared/slatec/zsqrt.lisp
   trunk/shared/slatec/zuchk.lisp
   trunk/shared/slatec/zunhj.lisp
   trunk/shared/slatec/zuni1.lisp
   trunk/shared/slatec/zuni2.lisp
   trunk/shared/slatec/zunik.lisp
   trunk/shared/slatec/zunk1.lisp
   trunk/shared/slatec/zunk2.lisp
   trunk/shared/slatec/zuoik.lisp
   trunk/shared/slatec/zwrsk.lisp
Modified:
   trunk/lisplab.asd
   trunk/shared/slatec/f2cl-lib.lisp
   trunk/src/core/level0-basic.lisp

Modified: trunk/lisplab.asd
==============================================================================
--- trunk/lisplab.asd	(original)
+++ trunk/lisplab.asd	Sun Mar 21 06:36:17 2010
@@ -28,8 +28,15 @@
   (:lisplab-base 
    :lisplab-matlisp 
    :lisplab-fftw
-   ; :slatec Slatec not in system becuase of compilation problems
-   :quadpack))
+   :slatec 
+   :quadpack)
+  :components 
+  ((:module :src/specfunc
+;    :depends-on (:lisplab-base :slatec) 
+    :components ((:file "level0-specfunc")))
+   (:module :src/integrate
+;    :depends-on (:lisplab-base :quadpack)
+    :components ((:file "quadpack")))))
 
 (defsystem :lisplab-base
   :depends-on ()
@@ -214,17 +221,10 @@
      (:file "level3-fft-fftw")))))
 
 (defsystem :quadpack
-  :depends-on (:lisplab-base)
+  :depends-on ()
   :components 
   (
    ;;
-   ;; Quadpack in lisplab
-   ;;
-   (:module :src/integrate
-    :depends-on (:/shared/quadpack/)
-    :components ((:file "quadpack")))
-
-   ;;
    ;; Quadpack. Generated with f2cl.
    ;; 
    (:module :/shared/quadpack/
@@ -275,23 +275,26 @@
      ))))
 
 (defsystem :slatec
-  :depends-on (:lisplab-base)
+  :depends-on ()
   :components 
   (
-   (:module :src/specfunc
-    :depends-on (:shared/slatec) 
-    :components ((:file "level0-specfunc")))
-   ;; 
-   ;; Slatec in lisplab
    ;;
+   ;; Quadpack. Generated with f2cl. 
+   ;; Taken from Maxima
+
    (:module :shared/slatec
+    :depends-on () 
     :components 
     (
      (:file "f2cl-package")
      (:file "f2cl-lib")
      ;; The package 
-     (:file "slatec")
+     (:file "slatec")))
 
+   (:module :shared/slatec/src
+    :depends-on (:shared/slatec) 
+    :components 
+    (
      (:file "fdump")
      (:file "j4save")
      (:file "initds"

Modified: trunk/shared/slatec/f2cl-lib.lisp
==============================================================================
--- trunk/shared/slatec/f2cl-lib.lisp	(original)
+++ trunk/shared/slatec/f2cl-lib.lisp	Sun Mar 21 06:36:17 2010
@@ -671,6 +671,7 @@
      (float-sign y x))))
 
 #+sbcl (defun sign (x y)
+	 (declare (type (or integer4 single-float double-float) x y))
 	 (etypecase x
 	   (integer4
 	    (isign x y))

Modified: trunk/src/core/level0-basic.lisp
==============================================================================
--- trunk/src/core/level0-basic.lisp	(original)
+++ trunk/src/core/level0-basic.lisp	Sun Mar 21 06:36:17 2010
@@ -28,7 +28,7 @@
 ;; Help, not tested
 #-sbcl(defmacro truely-the (type val) `(the ,type ,val))
 
-(setf *READ-DEFAULT-FLOAT-FORMAT* 'double-float) ; TODO make part of pacakge import?
+;; (setf *READ-DEFAULT-FLOAT-FORMAT* 'double-float) ; TODO make part of pacakge import?
 
 (defmacro with-gensyms ((&rest names) . body)
   ;; TODO remove? Is it used at all?

More information about the lisplab-cvs mailing list