diff --git a/extra/sorting/quick/quick.factor b/extra/sorting/quick/quick.factor
index 38ee1b9627..819fd59beb 100644
--- a/extra/sorting/quick/quick.factor
+++ b/extra/sorting/quick/quick.factor
@@ -36,7 +36,7 @@ IN: sorting.quick
 PRIVATE>
 
 : sort! ( seq quot: ( obj1 obj2 -- <=> ) -- )
-    [ 0 over length 1 - ] dip quicksort ;
+    [ 0 over length 1 - ] dip quicksort ; inline
 
 : sort-with! ( seq quot: ( elt -- key ) -- )
     [ compare ] curry sort! ; inline