From da95ae4219984bac0f22e713fc4c35dc6f3ff833 Mon Sep 17 00:00:00 2001
From: Dave Abrahams <dave@boostpro.com>
Date: Sat, 29 Dec 2001 00:01:53 +0000
Subject: [PATCH] Moved peek/poke to utility.jam

[SVN r12170]
---
 modules.jam | 19 -------------------
 1 file changed, 19 deletions(-)

diff --git a/modules.jam b/modules.jam
index b0135fcd6..ad89d81f7 100644
--- a/modules.jam
+++ b/modules.jam
@@ -108,22 +108,3 @@ rule import ( module-name : rules-opt * : rename-opt * )
     IMPORT $(module-name) : $(source-names) : [ CALLER_MODULE ] : $(target-names) ;
 }
 
-# Returns the module-local value of a variable.
-rule peek ( module-name variable )
-{
-    module $(module-name)
-    {
-        return $($(variable)) ;
-    }
-}
-
-local rule __test__ ( )
-{
-    import assert ;
-
-    module modules.__test__
-    {
-        module local foo = bar ;
-    }
-    assert.result bar :  peek modules.__test__ foo ;
-}
\ No newline at end of file