net.sockets.cc.asd

   1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Indent-tabs-mode: NIL -*-
   2 ;;;
   3 ;;; Copyright (C) 2006-2008, Attila Lendvai  <attila.lendvai@gmail.com>
   4 ;;;
   5 ;;; This code is free software; you can redistribute it and/or
   6 ;;; modify it under the terms of the version 2.1 of
   7 ;;; the GNU Lesser General Public License as published by
   8 ;;; the Free Software Foundation, as clarified by the
   9 ;;; preamble found here:
  10 ;;;     http://opensource.franz.com/preamble.html
  11 ;;;
  12 ;;; This program is distributed in the hope that it will be useful,
  13 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 ;;; GNU General Public License for more details.
  16 ;;;
  17 ;;; You should have received a copy of the GNU Lesser General
  18 ;;; Public License along with this library; if not, write to the
  19 ;;; Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
  20 ;;; Boston, MA 02110-1301, USA
  21
  22 (in-package :common-lisp-user)
  23
  24 (asdf:defsystem :net.sockets.cc
  25   :description "Extension to net.sockets that enables handling thousands of connection using continuations."
  26   :author "Attila Lendvai  <attila.lendvai@gmail.com>"
  27   :maintainer "Attila Lendvai  <attila.lendvai@gmail.com>"
  28   :licence "LLGPL-2.1"
  29   :depends-on (:net.sockets :cl-cont :io.streams :io.multiplex :alexandria :metabang-bind :bordeaux-threads)
  30   :pathname (merge-pathnames #p"net.sockets.cc/" *load-truename*)
  31   :serial t
  32   :components
  33   ((:file "package")
  34    (:file "duplicates")
  35    (:file "classes")
  36    (:file "cc-primitives")
  37    (:file "multiplexer")
  38    (:file "acceptor")))
  39
  40 (asdf:defsystem :net.sockets.cc.tests
  41   :description "Tests for :net.sockets.cc"
  42   :author "Attila Lendvai  <attila.lendvai@gmail.com>"
  43   :maintainer "Attila Lendvai  <attila.lendvai@gmail.com>"
  44   :licence "LLGPL-2.1"
  45   :depends-on (:net.sockets.cc :stefil)
  46   :pathname (merge-pathnames #p"tests/net.sockets.cc/" *load-truename*)
  47   :serial t
  48   :components
  49   ((:file "package")
  50    (:file "reverser")))
  51
  52 (defmethod asdf:perform ((o asdf:test-op) (c (eql (asdf:find-system :net.sockets.cc))))
  53   (asdf:operate 'asdf:load-op :net.sockets.cc.tests)
  54   (in-package :sockets/cc-tests)
  55   (declaim (optimize (debug 3)))
  56   (warn "(declaim (optimize (debug 3))) was issued to help later C-c C-c'ing")
  57   (eval (read-from-string "(stefil:funcall-test-with-feedback-message 'sockets/cc-tests::test)"))
  58   (values))
  59
  60 ;; TODO this should eventually be dropped when asdf gets the relevant OPERATION-DONE-P patch
  61 (defmethod asdf:operation-done-p ((op asdf:test-op) (system (eql (asdf:find-system :net.sockets.cc))))
  62   nil)