Make interpolate-locals public again

[factor.git] / basis / interpolate / interpolate.factor

diff --git a/basis/interpolate/interpolate.factor b/basis/interpolate/interpolate.factor
index 778f94ab6f19b9a3612e487992a7db16f72a6e0c..5c859f8947dcdca655a99bec9c4aba763b3b76c7 100644 (file)
--- 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