Tests for EVALing P6 code from P5

niner · Feb 7, 2015 · 9feb7b2 · 9feb7b2
1 parent 35bf0a4
commit 9feb7b2
Showing 1 changed file with 17 additions and 0 deletions.
diff --git a/t/eval_p6_in_p5.t b/t/eval_p6_in_p5.t
@@ -0,0 +1,17 @@
+#!/usr/bin/env perl6
+
+use v6;
+use Inline::Perl5;
+use Test;
+
+my $p5 = Inline::Perl5.new;
+
+is($p5.run(q:to/PERL5/), 2);
+        v6::run('1 + 1');
+    PERL5
+
+done;
+
+$p5.DESTROY;
+
+# vim: ft=perl6