usocket.asd - clic - Clic is an command line interactive client for gopher written in Common LISP (HTM) 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))