usocket.asd - clic - Clic is an command line interactive client for gopher written in Common LISP
HTML git clone git://bitreich.org/clic/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/clic/
DIR Log
DIR Files
DIR Refs
DIR Tags
DIR README
DIR LICENSE
---
usocket.asd (2073B)
---
1 ;;;; -*- Mode: LISP; Base: 10; Syntax: ANSI-Common-lisp; -*-
2 ;;;;
3 ;;;; See the LICENSE file for licensing information.
4
5 (in-package :asdf)
6
7 ;;; NOTE: the key "art" here is, no need to recompile any file when switching
8 ;;; between a native backend and IOlib backend. -- Chun Tian (binghe)
9
10 #+sample
11 (pushnew :usocket-iolib *features*)
12
13 (defsystem usocket
14 :name "usocket (client, with server symbols)"
15 :author "Erik Enge & Erik Huelsmann"
16 :maintainer "Chun Tian (binghe) & Hans Huebner"
17 :version (:read-file-form "version.sexp")
18 :licence "MIT"
19 :description "Universal socket library for Common Lisp"
20 :depends-on (:split-sequence
21 #+(and (or sbcl ecl)
22 (not usocket-iolib)) :sb-bsd-sockets
23 #+usocket-iolib :iolib)
24 :components ((:file "package")
25 (:module "vendor" :depends-on ("package")
26 :components (#+mcl (:file "kqueue")
27 #+mcl (:file "OpenTransportUDP")))
28 (:file "usocket" :depends-on ("vendor"))
29 (:file "condition" :depends-on ("usocket"))
30 #-usocket-iolib
31 (:module "backend" :depends-on ("condition")
32 :components (#+abcl (:file "abcl")
33 #+(or allegro cormanlisp)
34 (:file "allegro")
35 #+clisp (:file "clisp")
36 #+(or openmcl clozure)
37 (:file "openmcl")
38 #+clozure (:file "clozure" :depends-on ("openmcl"))
39 #+cmu (:file "cmucl")
40 #+(or sbcl ecl clasp)
41 (:file "sbcl")
42 #+ecl (:file "ecl" :depends-on ("sbcl"))
43 #+clasp (:file "clasp" :depends-on ("sbcl"))
44 #+lispworks (:file "lispworks")
45 #+mcl (:file "mcl")
46 #+mocl (:file "mocl")
47 #+scl (:file "scl")
48 #+genera (:file "genera")
49 #+mezzano (:file "mezzano")))
50 #-usocket-iolib
51 (:file "option" :depends-on ("backend"))
52 #+usocket-iolib
53 (:module "backend" :depends-on ("condition")
54 :components ((:file "iolib")))))
55
56 (defmethod perform ((op test-op) (c (eql (find-system :usocket))))
57 (oos 'load-op ':usocket-test)
58 (oos 'test-op ':usocket-test))