From a785e279d5d9aec26b33591dfb4cd8a8567ca80c Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Thu, 2 Apr 2020 17:30:13 -0700 Subject: [PATCH] windows.iphlpapi: use follow, it's simpler. --- basis/windows/iphlpapi/iphlpapi.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/basis/windows/iphlpapi/iphlpapi.factor b/basis/windows/iphlpapi/iphlpapi.factor index 8f910e0d26..8394b3bdf4 100644 --- a/basis/windows/iphlpapi/iphlpapi.factor +++ b/basis/windows/iphlpapi/iphlpapi.factor @@ -4,8 +4,8 @@ USING: accessors alien alien.c-types alien.data alien.strings alien.syntax arrays byte-arrays classes.struct combinators combinators.smart destructors io.encodings.string io.encodings.utf8 io.sockets io.sockets.private kernel libc -make refs sequences sequences.extras windows.errors -windows.kernel32 windows.types windows.winsock fry ; +make refs sequences windows.errors windows.kernel32 +windows.types windows.winsock ; IN: windows.iphlpapi LIBRARY: iphlpapi @@ -404,7 +404,7 @@ FUNCTION: DWORD GetNetworkParams ( PFIXED_INFO pFixedInfo, PULONG pOutBufLen ) > ] when ] keep ] loop>array nip ; + [ Next>> ] follow ; ! Don't use this, use each/map-adapters : iterate-interfaces ( -- seq ) -- 2.34.1