;; ip4 only (bind-func print_interface_addresses (lambda () (let ((ifs:ifaddrs** (alloc))) (pset! ifs 0 null) (getifaddrs ifs) (_print_interface_addresses (pref ifs 0)) void)))