Changeset 118

Show
Ignore:
Timestamp:
09/09/06 18:10:43
Author:
ehuelsmann
Message:

Apply patch by afuchs, fixing issue #6.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • usocket/trunk/backend/clisp.lisp

    r103 r118  
    1818(defparameter +clisp-error-map+ 
    1919  #+win32 
    20   (append (remap-for-win32 +unix-errno-condition-map+) 
    21           (remap-for-win32 +unix-errno-error-map+)) 
     20  (append (remap-maybe-for-win32 +unix-errno-condition-map+) 
     21          (remap-maybe-for-win32 +unix-errno-error-map+)) 
    2222  #-win32 
    2323  (append +unix-errno-condition-map+ 

  • usocket/trunk/backend/lispworks.lisp

    r103 r118  
    2020(defparameter +lispworks-error-map+ 
    2121  #+win32 
    22   (append (remap-for-win32 +unix-errno-condition-map+) 
    23           (remap-for-win32 +unix-errno-error-map+)) 
     22  (append (remap-maybe-for-win32 +unix-errno-condition-map+) 
     23          (remap-maybe-for-win32 +unix-errno-error-map+)) 
    2424  #-win32 
    2525  (append +unix-errno-condition-map+