+function psi\sethostent(bool $stayopen) : void {
+ let stayopen = intval($stayopen);
+ return void(sethostent);
+}
+function psi\setnetset(bool $stayopen) : void {
+ let stayopen = intval($stayopen);
+ return void(setnetent);
+}
+function psi\setprotoent(bool $stayopen) : void {
+ let stayopen = intval($stayopen);
+ return void(setprotoent);
+}
+function psi\setservent(bool $stayopen) : void {
+ let stayopen = intval($stayopen);
+ return void(setservent);
+}
+
+function psi\gethostent() : array {
+ return to_array(*gethostent,
+ to_string(h_name),
+ to_array(h_aliases, to_string(h_aliases)),
+ to_int(h_addrtype),
+ to_int(h_length),
+ to_array(h_addr_list, to_string(h_addr_list, h_length))
+ );
+}
+