From 3a65eeb9b614e7fa4b683db6a98ca0026b5a2404 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <dakkar@dechirico.(none)>
Date: Tue, 17 Mar 2009 17:46:40 +0100
Subject: passes the first test!

---
 lib/Tree/Transform/Utils.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 lib/Tree/Transform/Utils.pm

(limited to 'lib/Tree/Transform/Utils.pm')

diff --git a/lib/Tree/Transform/Utils.pm b/lib/Tree/Transform/Utils.pm
new file mode 100644
index 0000000..d8786dd
--- /dev/null
+++ b/lib/Tree/Transform/Utils.pm
@@ -0,0 +1,13 @@
+package Tree::Transform::Utils;
+use strict;
+use warnings;
+
+sub _rules_store {
+    no strict 'refs';
+    if (!defined *{$_[0].'::_tree_transform_rules'}{HASH}) {
+        *{$_[0].'::_tree_transform_rules'}={};
+    }
+    return *{$_[0].'::_tree_transform_rules'}{HASH};
+}
+
+1;
-- 
cgit v1.2.3