From 1c65b61f804c7689a41093df3483def36a5593fb Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Mon, 26 Jan 2009 02:39:15 -0600 Subject: [PATCH] Make interpolate-locals public again --- basis/interpolate/interpolate.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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 -- 2.34.1