]> gitweb.factorcode.org Git - factor.git/commitdiff
alien.utilities: rename utility word more? => deref?
authorDoug Coleman <doug.coleman@gmail.com>
Fri, 19 Aug 2022 04:11:41 +0000 (23:11 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Sun, 26 Feb 2023 23:11:03 +0000 (17:11 -0600)
basis/alien/utilities/utilities.factor

index f1f0a2cb99ba8fbb75a35fb731fe4768b5e04add..d35f5ffdc0ee0e2e8449950f470cbf96e5025c24 100644 (file)
@@ -7,14 +7,14 @@ IN: alien.utilities
 
 SPECIALIZED-ARRAY: void*
 
-: more? ( alien -- ? )
+: deref? ( alien -- ? )
     { [ ] [ void* deref ] } 1&& ;
 
 : advance ( void* -- void* )
     cell swap <displaced-alien> ;
 
 : alien>strings ( alien encoding -- strings )
-    [ [ dup more? ] ] dip
+    [ [ dup deref? ] ] dip
     '[ [ advance ] [ void* deref _ alien>string ] bi ]
     produce nip ;