Blame view

oct.asd 3.01 KB
8792d164   Raymond Toy   Initial version.
1
2
  ;;;; -*- Mode: lisp -*-
  ;;;;
e3b5afcc   Raymond Toy   Move the configur...
3
  ;;;; Copyright (c) 2007, 2011 Raymond Toy
8792d164   Raymond Toy   Initial version.
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
  ;;;;
  ;;;; Permission is hereby granted, free of charge, to any person
  ;;;; obtaining a copy of this software and associated documentation
  ;;;; files (the "Software"), to deal in the Software without
  ;;;; restriction, including without limitation the rights to use,
  ;;;; copy, modify, merge, publish, distribute, sublicense, and/or sell
  ;;;; copies of the Software, and to permit persons to whom the
  ;;;; Software is furnished to do so, subject to the following
  ;;;; conditions:
  ;;;;
  ;;;; The above copyright notice and this permission notice shall be
  ;;;; included in all copies or substantial portions of the Software.
  ;;;;
  ;;;; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  ;;;; EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
  ;;;; OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  ;;;; NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
  ;;;; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
  ;;;; WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
  ;;;; OTHER DEALINGS IN THE SOFTWARE.
  
  ;;; This is the asdf definition for oct.  I don't normally use this,
  ;;; so it might be out of date.  Use at your own risk.
  
8792d164   Raymond Toy   Initial version.
29
  (defpackage #:oct-system
cc9eb34a   Raymond Toy   Add test-op for o...
30
    (:use #:cl #:asdf))
8792d164   Raymond Toy   Initial version.
31
32
33
34
35
36
  
  (in-package #:oct-system)
  
  (asdf:defsystem oct
    :description "A portable implementation of quad-double arithmetic.  See <http://www.common-lisp.net/project/oct>."
    :author "Raymond Toy"
93c7ff0a   Raymond Toy   Fix minor typo.
37
    :maintainer "See <http://www.common-lisp.net/project/oct>"
8792d164   Raymond Toy   Initial version.
38
    :licence "MIT"
e3b5afcc   Raymond Toy   Move the configur...
39
    :version "2011-02-09"			; Just use the date
8792d164   Raymond Toy   Initial version.
40
41
42
43
    :components
    ((:file "qd-package")
     (:file "qd-rep" :depends-on ("qd-package"))
     #-cmu
c3f30be7   Raymond Toy   Update dependencies.
44
     (:file "qd-dd" :depends-on ("qd-package" "qd-rep"))
8792d164   Raymond Toy   Initial version.
45
     (:file "qd"
c3f30be7   Raymond Toy   Update dependencies.
46
  	  :depends-on ("qd-rep" #-cmu "qd-dd"))
8792d164   Raymond Toy   Initial version.
47
48
49
50
51
52
53
54
     (:file "qd-io"
  	  :depends-on ("qd"))
     (:file "qd-const"
  	  :depends-on ("qd-io"))
     (:file "qd-fun"
  	  :depends-on ("qd" "qd-const"))
     (:file "qd-class"
  	  :depends-on ("qd-fun"))
d2650578   Raymond Toy   Move +pi+ and fri...
55
     (:file "qd-const2" :depends-on ("qd-class"))
8792d164   Raymond Toy   Initial version.
56
57
     (:file "qd-methods"
  	  :depends-on ("qd-class"))
3d37e3b9   Raymond Toy   Move #Q reader fu...
58
     (:file "qd-reader"
8792d164   Raymond Toy   Initial version.
59
  	  :depends-on ("qd-methods"))
3d37e3b9   Raymond Toy   Move #Q reader fu...
60
61
     (:file "qd-format"
  	  :depends-on ("qd-methods" "qd-reader"))
8792d164   Raymond Toy   Initial version.
62
     (:file "qd-complex"
3d37e3b9   Raymond Toy   Move #Q reader fu...
63
  	  :depends-on ("qd-methods" "qd-reader"))
535d2509   Raymond Toy   Add support for J...
64
     (:file "qd-elliptic"
3d37e3b9   Raymond Toy   Move #Q reader fu...
65
  	  :depends-on ("qd-methods" "qd-reader"))
8ade177a   Raymond Toy   Add Elliptic thet...
66
67
     (:file "qd-theta"
  	  :depends-on ("qd-methods" "qd-reader"))
a40062c6   Raymond Toy   Add gamma and log...
68
     (:file "qd-gamma"
70745f48   Raymond Toy   qd-gamma depends ...
69
  	  :depends-on ("qd-methods" "qd-reader"))
8792d164   Raymond Toy   Initial version.
70
     ))
cc9eb34a   Raymond Toy   Add test-op for o...
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
  
  (defmethod perform ((op test-op) (c (eql (find-system :oct))))
    (oos 'test-op 'oct-tests))
  
  (asdf:defsystem oct-tests
    :depends-on (oct)
    :version "2011-02-09"			; Just use the date
    :in-order-to ((compile-op (load-op :rt))
  		(test-op (load-op :rt :oct)))
    :components
    ((:file "qd-extra")
     (:file "qd-test")
     (:file "rt-tests")))
  
  (defmethod perform ((op test-op) (c (eql (find-system :oct-tests))))
    (or (funcall (intern "DO-TESTS" (find-package "RT")))
7310f8e9   Raymond Toy   Add newline to en...
87
        (error "TEST-OP failed for OCT-TESTS")))
aee0737f   Raymond Toy   Fix ticket #1.