assocs.extras: Move some often-used words to core

[factor.git] / extra / tools / image-analyzer / gc-info / gc-info-tests.factor

diff --git a/extra/tools/image-analyzer/gc-info/gc-info-tests.factor b/extra/tools/image-analyzer/gc-info/gc-info-tests.factor
index ae85daf308fd1b6f7cff657513faeaa8989d4af0..d086cdb43c682ce9f1d90302e5a1795e134e3fa0 100644 (file)
--- a/extra/tools/image-analyzer/gc-info/gc-info-tests.factor
+++ b/extra/tools/image-analyzer/gc-info/gc-info-tests.factor
@@ -50,7 +50,7 @@ QUALIFIED: opencl
 : base-pointer-groups-decoded ( word -- seq )
     word>gc-maps [
         second second [ swap 2array ] map-index
-        [ nip -1 = ] assoc-reject
+        [ -1 = ] reject-values
     ] map ;
 
 ! byte-array>bit-array