diff --git a/basis/interpolate/interpolate.factor b/basis/interpolate/interpolate.factor
index 778f94ab6f..5c859f8947 100644
--- a/basis/interpolate/interpolate.factor
+++ b/basis/interpolate/interpolate.factor
@@ -30,14 +30,14 @@ TUPLE: interpolate-var name ;
         if
     ] map [ ] join ; inline
 
-: interpolate-locals ( string -- quot )
-    [ search [ ] ] (interpolate) ;
-
 PRIVATE>
 
 MACRO: interpolate ( string -- )
     [ [ get ] ] (interpolate) ;
 
+: interpolate-locals ( string -- quot )
+    [ search [ ] ] (interpolate) ;
+
 : I[
     "]I" parse-multiline-string
     interpolate-locals over push-all ; parsing