EQL number comparison when object can be NIL

When comparison object may be NIL, type-error of = is an unfeature.

Author: kilianmh

quicklisp/http.lisp

@@ -322,7 +322,7 @@
 
 (defun full-proxy-path (host port path)
   (format nil "~:[http~;https~]://~A~:[:~D~;~*~]~A"
-          (= port 443)
+          (eql port 443)
           host
           (or (null port)
               (= port 80)