1 ;;;; -*- Mode: Lisp; indent-tabs-mode: nil -*-
3 (asdf:defsystem :iolib.common-lisp
4 :description "Slightly modified Common Lisp."
5 :maintainer "Stelian Ionescu <sionescu@cddr.org>"
6 :version #.(with-open-file (f (merge-pathnames "../version.lisp-expr"
7 (or *compile-file-pathname*
11 :defsystem-depends-on (:iolib.asdf :iolib.conf)
12 :depends-on (:alexandria)
13 :default-component-class :iolib-source-file
17 #+scl (:file "scl-gray-streams")
18 (:file "pkgdcl" :depends-on ("conduits" #+scl "scl-gray-streams"))
20 :depends-on ("pkgdcl" #+scl "scl-gray-streams"))
21 (:file "definitions" :depends-on ("pkgdcl"))
22 (:file "types" :depends-on ("pkgdcl")))
23 :perform (asdf:compile-op :before (o c)
24 (funcall (find-symbol (string '#:load-gray-streams)
26 :perform (asdf:load-op :before (o c)
27 (funcall (find-symbol (string '#:load-gray-streams)
29 :perform (asdf:load-source-op :before (o c)
30 (funcall (find-symbol (string '#:load-gray-streams)
33 (asdf:defsystem :iolib.base
34 :description "Base IOlib package, used instead of CL."
35 :author "Stelian Ionescu <sionescu@cddr.org>"
36 :maintainer "Stelian Ionescu <sionescu@cddr.org>"
37 :version #.(with-open-file (f (merge-pathnames "../version.lisp-expr"
38 (or *compile-file-pathname*
42 :defsystem-depends-on (:iolib.asdf :iolib.conf)
43 :depends-on (:iolib.common-lisp :alexandria :split-sequence)
44 :default-component-class :iolib-source-file
48 (:file "return-star" :depends-on ("pkgdcl"))
49 (:file "types" :depends-on ("pkgdcl" "return-star"))
50 (:file "debug" :depends-on ("pkgdcl" "return-star"))
51 (:file "conditions" :depends-on ("pkgdcl" "return-star"))
52 (:file "defalias" :depends-on ("pkgdcl" "return-star"))
53 (:file "deffoldable" :depends-on ("pkgdcl" "return-star"))
54 (:file "defobsolete" :depends-on ("pkgdcl" "return-star"))
55 (:file "reader" :depends-on ("pkgdcl" "return-star" "conditions"))
56 (:file "sequence" :depends-on ("pkgdcl" "return-star"))
57 (:file "matching" :depends-on ("pkgdcl" "return-star"))
58 (:file "time" :depends-on ("pkgdcl" "return-star"))))