]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/unix/utilities/utilities.factor
Remove usages of <void*> and *void*
[factor.git] / basis / unix / utilities / utilities.factor
index 919b2ae8a2eabafebba8722633dbb30dbc8d1b63..cd32c91d3cbab2b0fd7934c28c859fddf32d0d6f 100644 (file)
@@ -8,14 +8,14 @@ IN: unix.utilities
 SPECIALIZED-ARRAY: void*
 
 : more? ( alien -- ? )
-    { [ ] [ *void* ] } 1&& ;
+    { [ ] [ void* deref ] } 1&& ;
 
 : advance ( void* -- void* )
     cell swap <displaced-alien> ;
 
 : alien>strings ( alien encoding -- strings )
     [ [ dup more? ] ] dip
-    '[ [ advance ] [ *void* _ alien>string ] bi ]
+    '[ [ advance ] [ void* deref _ alien>string ] bi ]
     produce nip ;
 
 : strings>alien ( strings encoding -- array )