Changeset 8949


Ignore:
Timestamp:
Mar 30, 2008, 8:00:24 AM (11 years ago)
Author:
gb
Message:

Whole file is #-windows-target, for now.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/win64/level-1/l1-sockets.lisp

    r8604 r8949  
    1717(in-package "CCL")
    1818
    19 
     19#-windows-target                        ; needs lots of work
     20(progn
    2021
    2122;;; basic socket API
     
    172173
    173174(defvar *socket-error-identifiers*
    174   (list #$EADDRINUSE :address-in-use
    175         #$ECONNABORTED :connection-aborted
    176         #$ENOBUFS :no-buffer-space
     175  (list #+windows-target #$WSAEADDRINUSE #-windows-target #$EADDRINUSE :address-in-use
     176        #+windows-target #$WSAECONNABORTED #-windows-target #$ECONNABORTED :connection-aborted
     177        #+windows-target #$WSAENOBUFS #-windows-target #$ENOBUFS :no-buffer-space
    177178        #$ENOMEM :no-buffer-space
    178179        #$ENFILE :no-buffer-space
    179         #$ETIMEDOUT :connection-timed-out
    180         #$ECONNREFUSED :connection-refused
    181         #$ENETUNREACH :host-unreachable
    182         #$EHOSTUNREACH :host-unreachable
    183         #$EHOSTDOWN :host-down
    184         #$ENETDOWN :network-down
    185         #$EADDRNOTAVAIL :address-not-available
    186         #$ENETRESET :network-reset
    187         #$ECONNRESET :connection-reset
    188         #$ESHUTDOWN :shutdown
     180        #+windows-target #$WSAETIMEDOUT #-windows-target #$ETIMEDOUT :connection-timed-out
     181        #+windows-target #$WSAECONNREFUSED #-windows-target #$ECONNREFUSED :connection-refused
     182        #+windows-target #$WSAENETUNREACH #-windows-target #$ENETUNREACH :host-unreachable
     183        #+windows-target #$WSAEHOSTUNREACH #-windows-target#$EHOSTUNREACH :host-unreachable
     184        #+windows-target #$WSAEHOSTDOWN #-windows-target#$EHOSTDOWN :host-down
     185        #+windows-target #$WSAENETDOWN #-windows-target#$ENETDOWN :network-down
     186        #+windows-target #$WSAEADDRNOTAVAIL #-windows-target#$EADDRNOTAVAIL :address-not-available
     187        #+windows-target #$WSAENETRESET #-windows-target#$ENETRESET :network-reset
     188        #+windows-target #$WSAECONNRESET #-windows-target#$ECONNRESET :connection-reset
     189        #+windows-target #$WSAESHUTDOWN #-windows-target#$ESHUTDOWN :shutdown
    189190        #$EACCES :access-denied
    190191        #$EPERM :access-denied))
     
    15571558(defmethod stream-io-error ((stream socket) errno where)
    15581559  (socket-error stream where errno))
     1560)                                       ; #-windows-target
Note: See TracChangeset for help on using the changeset viewer.