Permalink
Browse files

generate a dot and make sure it parses.

  • Loading branch information...
timo committed Dec 11, 2012
1 parent c49c807 commit 7052999b8df31c88c3dafc96849e99998d4152c5
Showing with 10 additions and 0 deletions.
  1. +10 −0 t/03-gen-and-parse.t
View
@@ -0,0 +1,10 @@
+use Test;
+use Graphviz::Grammar;
+use Graphviz::Dot;
+
+plan 1;
+
+{
+ my $a = Graph.new: :items([Edge.new(Node.new("A"), Node.new("B"))]);
+ lives_ok { Graphviz::Grammar::Dot.parse($a.dot) }, "parse a generated dot document";
+}

0 comments on commit 7052999

Please sign in to comment.