Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Changes to socket.sls.

    58     58       (define-ftype in_addr
    59     59         (struct (s_addr in_addr_t)))
    60     60       
    61     61       ;; WARNING- here the size of sin_zero should be calculated on your machine as:
    62     62       
    63     63       #;(import (c-eval))
    64     64       #;(parameterize ([c-eval-includes '("stdio.h" "sys/socket.h" "netinet/in.h")])
    65         -    (c-eval-printf "%d" "sizeof(struct sockaddr_in) - sizeof (sa_family_t) - sizeof(in_port_t) - sizeof(in_addr_t)"))
           65  +    (c-eval-printf "%d" "sizeof(((struct sockaddr_in *) NULL)->sin_zero)"))
    66     66       ;; in my case  (a6le) -> 8
    67     67       
    68     68       (define-ftype sockaddr_in
    69     69         (struct
    70     70          (sin_family sa_family_t)
    71     71          (sin_port in_port_t)
    72     72          (sin_addr in_addr)