unix.ffi: Use a utility word for getting the aliases back.

basis/unix/ffi/ffi-tests.factor

@@ -1,10 +1,12 @@
+USING: accessors alien.c-types io.encodings.utf8 kernel
+sequences tools.test unix.ffi unix.utilities ;
 IN: unix.ffi.tests
-USING: accessors alien.c-types tools.test unix.ffi ;
 
 [ 80 ] [ "http" f getservbyname port>> ntohs ] unit-test
 
-[ "www" ] [
-    0 "http" f getservbyname aliases>> c-string alien-element
+[ t ] [
+    0 "http" f getservbyname aliases>> utf8 alien>strings
+    "www" swap member?
 ] unit-test
 
 [ "http" ] [ 80 htons f getservbyport name>> ] unit-test