Test and benchmark conversion of inline annotations
Change-Id: I2eaabb35373b2a4c87c329a4a5254a5f347e989c
diff --git a/xt/benchmark.pl b/xt/benchmark.pl
index 163b85b..71dbe54 100644
--- a/xt/benchmark.pl
+++ b/xt/benchmark.pl
@@ -36,8 +36,9 @@
my $f = dirname(__FILE__);
my $script = rel2abs(catfile($f, '..', 'script', $SCRIPT_NAME));
-# Load example file
+# Load example files
my $file = rel2abs(catfile($f, '..', 't', 'data', 'goe_sample.i5.xml'));
+my $goe_tagged = rel2abs(catfile($f, '..', 't', 'data', 'goe_sample_tagged.i5.xml'));
# Create a new benchmark object
my $bench = Dumbbench->new(
@@ -86,6 +87,12 @@
}
),
Dumbbench::Instance::PerlSub->new(
+ name => 'Conversion-with-inline-annotations',
+ code => sub {
+ `cat '$goe_tagged' | KORAPXMLTEI_INLINE=1 perl '$script' > /dev/null 2>&1`
+ }
+ ),
+ Dumbbench::Instance::PerlSub->new(
name => 'delHTMLcom',
code => sub {
for (1..100_000) {