io: fix hostname lookup for tcp-listen

Need to lookup with "passive" flag. Some platforms/configurations
apparently don't care, but some do.

racket/src/cs/rumble/foreign.ss

@@ -1703,7 +1703,12 @@
              (cpointer->name proc-p))))]
        [else
         (lambda (to-wrap)
-          (let* ([proc-p (unwrap-cpointer 'ffi-call to-wrap)])
+          (let* ([proc-p (unwrap-cpointer 'ffi-call to-wrap)]
+                 #;
+                 [name (and (ffi-obj? proc-p) (let ([n (cpointer/ffi-obj-name proc-p)])
+                                                (if (bytes? n)
+                                                    (utf8->string n)
+                                                    n)))])
             (do-procedure-reduce-arity-mask
              (lambda orig-args
                (let* ([args (map (lambda (orig-arg in-type)

racket/src/io/network/tcp-listen.rkt

@@ -41,6 +41,8 @@
       ;; or might return a listener
       (call-with-resolved-address
        hostname port-no
+       #:family family
+       #:passive? #t
        ;; in atomic mode
        (lambda (addr)
          (cond