Commits

Shlomi Fish committed 4e0bbfc

Testing output => dom.

Comments (0)

Files changed (1)

XML-GrammarBase/t/xslt.t

 use strict;
 use warnings;
 
-use Test::More tests => 2;
+use Test::More tests => 3;
 
 package MyGrammar::XSLT;
 
         );
     }
 
+    {
+        my $final_dom = $xslt->perform_xslt_translation(
+            {
+                source => {string_ref => \(_utf8_slurp($input_fn)) },
+                output => "dom",
+            }
+        );
+
+        my $xml_source = _utf8_slurp($output_fn);
+
+        # TEST:$c++;
+        is_xml_ordered(
+            [ string => $final_dom->toString(), ],
+            [ string => $xml_source, ],
+            "'$input_fn' generated good output on source/string_ref - output - dom"
+        );
+    }
     return;
 }