anchor.diff:             #:ecl
              #:gcl
              #:lispworks
  +	   #:mkcl
              #:scl
              #:sbcl))
   
  
positive.code: ;;; Try to canonicalize to an absolute pathname; helps on Lisps where
  ;;; *default-pathname-defaults* isn't an absolute pathname at startup
  ;;; (e.g. CCL, CMUCL)
  (setf *default-pathname-defaults* (truename *default-pathname-defaults*))
  
  (write-string *after-load-message*)
  
  
negative.code: (definterface host-address (host)
    (:implementation t
      host)
    (:implementation mkcl
      (qlqs-mkcl:host-ent-address (qlqs-mkcl:get-host-by-name host)))
    (:implementation sbcl
      (qlqs-sbcl:host-ent-address (qlqs-sbcl:get-host-by-name host))))
  
  