diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 4accabb8d6..de49a339c9 100755
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -535,9 +535,13 @@ PRIVATE>
 : last-index-from ( obj i seq -- n )
     rot [ = ] curry find-last-from drop ;
 
+<PRIVATE
+
 : (indices) ( elt i obj accum -- )
     [ swap [ = ] dip ] dip [ push ] 2curry when ; inline
 
+PRIVATE>
+
 : indices ( obj seq -- indices )
     swap V{ } clone
     [ [ (indices) ] 2curry each-index ] keep ;