diff -r -C 2 iolib/CHANGES ../../UCW-old/dependencies/iolib-0.7.3/CHANGES
*** iolib/CHANGES	2023-09-07 19:24:55.448225319 +0100
--- ../../UCW-old/dependencies/iolib-0.7.3/CHANGES	2010-10-24 15:30:22.000000000 +0100
***************
*** 1,4 ****
--- 1,18 ----
  -*- mode: outline; fill-column: 78 -*-
  
+ * Changes since 0.7.2:
+ 
+ ** Bug fixes:
+ - Fix IOLIB.SYSCALLS::PARSE-NAME-AND-OPTIONS (reported by Marshall McLuhan)
+ 
+ 
+ 
+ * Changes since 0.7.1:
+ 
+ ** Bug fixes:
+ - Don't redefine Alexandria functions (patch by Nikodemus Siivola)
+ 
+ 
+ 
  * Changes since 0.7.0:
  
Only in iolib/: .git
Only in iolib/: .gitattributes
Only in iolib/: .gitconfig
Only in iolib/: .gitignore
diff -r -C 2 iolib/src/sockets/address.lisp ../../UCW-old/dependencies/iolib-0.7.3/src/sockets/address.lisp
*** iolib/src/sockets/address.lisp	2023-09-07 19:24:55.460225206 +0100
--- ../../UCW-old/dependencies/iolib-0.7.3/src/sockets/address.lisp	2010-10-15 10:11:48.000000000 +0100
***************
*** 163,168 ****
               (values start end start-i trailing-colon-p
                       tokens-from-leading-or-trailing-zeros)))
-          (emptyp (string)
-            (= 0 (length string)))
           ;; we need to use this instead of dotted-to-vector because
           ;; abbreviated IPv4 addresses are invalid in this context.
--- 163,166 ----
diff -r -C 2 iolib/src/syscalls/early.lisp ../../UCW-old/dependencies/iolib-0.7.3/src/syscalls/early.lisp
*** iolib/src/syscalls/early.lisp	2023-09-07 19:24:55.472225094 +0100
--- ../../UCW-old/dependencies/iolib-0.7.3/src/syscalls/early.lisp	2010-10-24 15:28:03.000000000 +0100
***************
*** 141,146 ****
    (cond
      ((stringp spec)
!      (values (cffi::lisp-name spec) (cffi::foreign-name spec)
!              (cffi::foreign-options spec nil)))
      (t
       (values (first spec)
--- 141,146 ----
    (cond
      ((stringp spec)
!      (values (cffi::lisp-name spec nil) (cffi::foreign-name spec nil)
!              (cffi::foreign-options nil nil)))
      (t
       (values (first spec)
***************
*** 151,155 ****
                 (or (find-if #'foreign-symbol-pointer foreign-names)
                     (car foreign-names)))
!              (cffi::foreign-options spec nil)))))
  
  
--- 151,155 ----
                 (or (find-if #'foreign-symbol-pointer foreign-names)
                     (car foreign-names)))
!              (cffi::foreign-options (cddr spec) nil)))))
  
  
Only in iolib/: .template.lisp
diff -r -C 2 iolib/tests/streams.lisp ../../UCW-old/dependencies/iolib-0.7.3/tests/streams.lisp
*** iolib/tests/streams.lisp	2023-09-07 19:24:55.480225018 +0100
--- ../../UCW-old/dependencies/iolib-0.7.3/tests/streams.lisp	2010-10-15 10:11:48.000000000 +0100
***************
*** 136,141 ****
  ;;; output file is opened with the :DIRECTION keyword argument
  ;;; DIRECTION-OUT.
! (defun copy-file (path-in external-format-in path-out external-format-out
!                   direction-out direction-in)
    (with-open-file-stream (in path-in
                               :direction direction-in
--- 136,141 ----
  ;;; output file is opened with the :DIRECTION keyword argument
  ;;; DIRECTION-OUT.
! (defun %copy-file (path-in external-format-in path-out external-format-out
!                    direction-out direction-in)
    (with-open-file-stream (in path-in
                               :direction direction-in
***************
*** 175,181 ****
                                     direction-out)))
            (format *error-output* "~&;; ~A.~%" description)
!           (copy-file full-path-in external-format-in
!                      full-path-out external-format-out
!                      direction-out direction-in)
            (unless (file-equal full-path-out full-path-orig)
              (format *error-output* "~&;;   Test failed!!!~%")
--- 175,181 ----
                                     direction-out)))
            (format *error-output* "~&;; ~A.~%" description)
!           (%copy-file full-path-in external-format-in
!                       full-path-out external-format-out
!                       direction-out direction-in)
            (unless (file-equal full-path-out full-path-orig)
              (format *error-output* "~&;;   Test failed!!!~%")
diff -r -C 2 iolib/version.lisp-expr ../../UCW-old/dependencies/iolib-0.7.3/version.lisp-expr
*** iolib/version.lisp-expr	2023-09-07 19:24:55.480225018 +0100
--- ../../UCW-old/dependencies/iolib-0.7.3/version.lisp-expr	2010-10-24 15:28:34.000000000 +0100
***************
*** 1,2 ****
  ;; -*- lisp -*-
! "0.7.1"
--- 1,2 ----
  ;; -*- lisp -*-
! "0.7.3"