From a34c723255bcc33e331a093f2df4a557fb117760 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Fri, 28 Dec 2012 17:15:34 -0600
Subject: implement include

---
 lib/Bread/Board.pm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'lib')

diff --git a/lib/Bread/Board.pm b/lib/Bread/Board.pm
index 1132fd3..1934ec0 100644
--- a/lib/Bread/Board.pm
+++ b/lib/Bread/Board.pm
@@ -451,4 +451,9 @@ sub wire_names (*@names) is export {
     return @names.map(-> $name { $name => depends_on($name) }).hash;
 }
 
+sub include (Str $path) is export {
+    my $contents = slurp $path;
+    eval $contents;
+}
+
 # vim:ft=perl6:foldmethod=manual
-- 
cgit v1.2.3