contrib: call provide uniformly

Various contrib modules called provide with varying syntax from "module"
through 'module to '#:module. The last one is picked:

(provide '#:module)

contrib/bytecmp/bytecmp.lsp

@@ -135,7 +135,7 @@
 (install-bytecodes-compiler)
 )
 
-(provide 'BYTECMP)
+(provide '#:BYTECMP)
 
 #-ecl-min
 (package-lock "COMMON-LISP" t)

contrib/deflate/deflate.asd

@@ -37,7 +37,7 @@
 ;;;; ASDF system definition facility.
 ;;;; 
 
-(asdf:defsystem "deflate"
+(asdf:defsystem '#:deflate
     :description "Deflate Decompression Library"
     :author "Pierre R. Mai <pmai@pmsf.de>"
     :components ((:file "deflate")))

contrib/deflate/deflate.lisp

@@ -788,3 +788,5 @@ match."
                             :element-type '(unsigned-byte 8))
       (inflate-gzip-stream input output)))
   (probe-file output-file))
+
+(provide '#:deflate)

contrib/ecl-cdb/ecl-cdb.lisp

@@ -263,4 +263,4 @@
       (with-open-file (s stream :direction :input :element-type '(unsigned-byte 8))
         (map-cdb function s))))
 
-(provide :ecl-cdb)
+(provide '#:ecl-cdb)

contrib/ecl-curl/ecl-curl.lisp

@@ -264,3 +264,5 @@
           (when o (close o :abort (null ok?))))))
     (close stream))
   (values url))
+
+(provide '#:ecl-curl)

contrib/quicklisp/ecl-quicklisp.lisp

@@ -60,6 +60,4 @@
     (format t "~%;;; Unable to load / install quicklisp. Error message follows:~%~A"
             c)))
 
-(provide "ecl-quicklisp")
-
-
+(provide '#:ecl-quicklisp)

contrib/serve-event/serve-event.lisp

@@ -229,4 +229,4 @@ T if SERVE-EVENT did something and NIL if not."
       ((null sval) res)
     (setq res t)))
 
-(provide 'serve-event)
+(provide '#:serve-event)

contrib/sockets/sockets.lisp

@@ -1710,5 +1710,5 @@ GET-NAME-SERVICE-ERRNO")
 ;; Add sockopts here as you need them...
 
 ;; Finished loading
-(provide 'sockets)
-(provide 'sb-bsd-sockets)
+(provide '#:sockets)
+(provide '#:sb-bsd-sockets)