anchor.diff:             #:abcl
              #:allegro
              #:ccl
  +           #:clasp
              #:clisp
              #:cmucl
              #:cormanlisp
  
positive.code:   (:reexport-from #:ccl
                    #:make-socket))
  
  ;;; GNU CLISP
  
  (define-implementation-package :clisp #:qlqs-clisp
  
negative.code:   (:implementation ccl
      (qlqs-ccl:make-socket :remote-host host
                           :remote-port port))
    (:implementation clasp
      (let* ((endpoint (qlqs-clasp:host-ent-address
                        (qlqs-clasp:get-host-by-name host)))
             (socket (make-instance 'qlqs-clasp:inet-socket
                                    :protocol :tcp
                                    :type :stream)))
        (qlqs-clasp:socket-connect socket endpoint port)
        (qlqs-clasp:socket-make-stream socket
                                    :element-type '(unsigned-byte 8)
                                    :input t
                                    :output t
                                    :buffering :full)))
    (:implementation clisp
      (qlqs-clisp:socket-connect port host :element-type '(unsigned-byte 8)))
    (:implementation cmucl
  