anchor.diff:  (progn
     #-:wsock
     (ffi:clines
  +   "#include <errno.h>"
      "#include <sys/socket.h>")
     #+:wsock
     (ffi:clines
  
positive.code:                          (#1 != Cnil) ? &tv : NULL);
  
            if (count == 0)
              @(return) = Cnil;
            else if (count < 0)
              /*###FIXME: We should be raising an error here...
  
                except, ofcourse in case of EINTR or EAGAIN */
  
              @(return) = Cnil;
            else
              {
                cl_object rv = Cnil;
  
negative.code: 
                  cur_fd = cur_fd->cons.cdr;
                }
                @(return 0) = rv;
                @(return 1) = Cnil;
              }
  }"))
  
  