59 lines
2 KiB
Text
59 lines
2 KiB
Text
|
;;;; -*- Mode: LISP; Base: 10; Syntax: ANSI-Common-lisp; -*-
|
||
|
|
;;;;
|
||
|
|
;;;; See the LICENSE file for licensing information.
|
||
|
|
|
||
|
|
(in-package :asdf)
|
||
|
|
|
||
|
|
;;; NOTE: the key "art" here is, no need to recompile any file when switching
|
||
|
|
;;; between a native backend and IOlib backend. -- Chun Tian (binghe)
|
||
|
|
|
||
|
|
#+sample
|
||
|
|
(pushnew :usocket-iolib *features*)
|
||
|
|
|
||
|
|
(defsystem usocket
|
||
|
|
:name "usocket (client, with server symbols)"
|
||
|
|
:author "Erik Enge & Erik Huelsmann"
|
||
|
|
:maintainer "Chun Tian (binghe) & Hans Huebner"
|
||
|
|
:version (:read-file-form "version.sexp")
|
||
|
|
:licence "MIT"
|
||
|
|
:description "Universal socket library for Common Lisp"
|
||
|
|
:depends-on (:split-sequence
|
||
|
|
#+(and (or sbcl ecl)
|
||
|
|
(not usocket-iolib)) :sb-bsd-sockets
|
||
|
|
#+usocket-iolib :iolib)
|
||
|
|
:components ((:file "package")
|
||
|
|
(:module "vendor" :depends-on ("package")
|
||
|
|
:components (#+mcl (:file "kqueue")
|
||
|
|
#+mcl (:file "OpenTransportUDP")))
|
||
|
|
(:file "usocket" :depends-on ("vendor"))
|
||
|
|
(:file "condition" :depends-on ("usocket"))
|
||
|
|
#-usocket-iolib
|
||
|
|
(:module "backend" :depends-on ("condition")
|
||
|
|
:components (#+abcl (:file "abcl")
|
||
|
|
#+(or allegro cormanlisp)
|
||
|
|
(:file "allegro")
|
||
|
|
#+clisp (:file "clisp")
|
||
|
|
#+(or openmcl clozure)
|
||
|
|
(:file "openmcl")
|
||
|
|
#+clozure (:file "clozure" :depends-on ("openmcl"))
|
||
|
|
#+cmu (:file "cmucl")
|
||
|
|
#+(or sbcl ecl clasp)
|
||
|
|
(:file "sbcl")
|
||
|
|
#+ecl (:file "ecl" :depends-on ("sbcl"))
|
||
|
|
#+clasp (:file "clasp" :depends-on ("sbcl"))
|
||
|
|
#+lispworks (:file "lispworks")
|
||
|
|
#+mcl (:file "mcl")
|
||
|
|
#+mocl (:file "mocl")
|
||
|
|
#+scl (:file "scl")
|
||
|
|
#+genera (:file "genera")
|
||
|
|
#+mezzano (:file "mezzano")))
|
||
|
|
#-usocket-iolib
|
||
|
|
(:file "option" :depends-on ("backend"))
|
||
|
|
#+usocket-iolib
|
||
|
|
(:module "backend" :depends-on ("condition")
|
||
|
|
:components ((:file "iolib")))))
|
||
|
|
|
||
|
|
(defmethod perform ((op test-op) (c (eql (find-system :usocket))))
|
||
|
|
(oos 'load-op ':usocket-test)
|
||
|
|
(oos 'test-op ':usocket-test))
|