From bb0818a21f7aa47f5f531a426d09bf95478060c9 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Thu, 18 Aug 2022 23:11:41 -0500 Subject: [PATCH] alien.utilities: rename utility word more? => deref? --- basis/alien/utilities/utilities.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/alien/utilities/utilities.factor b/basis/alien/utilities/utilities.factor index f1f0a2cb99..d35f5ffdc0 100644 --- a/basis/alien/utilities/utilities.factor +++ b/basis/alien/utilities/utilities.factor @@ -7,14 +7,14 @@ IN: alien.utilities SPECIALIZED-ARRAY: void* -: more? ( alien -- ? ) +: deref? ( alien -- ? ) { [ ] [ void* deref ] } 1&& ; : advance ( void* -- void* ) cell swap ; : alien>strings ( alien encoding -- strings ) - [ [ dup more? ] ] dip + [ [ dup deref? ] ] dip '[ [ advance ] [ void* deref _ alien>string ] bi ] produce nip ; -- 2.34.1