summaryrefslogtreecommitdiffstats
path: root/qpdf/qtest/c-api-check.test
diff options
context:
space:
mode:
authorJay Berkenbilt <ejb@ql.org>2022-05-19 23:27:41 +0200
committerJay Berkenbilt <ejb@ql.org>2022-05-20 15:16:25 +0200
commit6c5e590673331aa685afe8aa997b0b7e64996004 (patch)
tree66f14ee6b4a5bb6bc1f6bfa006d40ec9c8760b74 /qpdf/qtest/c-api-check.test
parent6f43bf8de36b08c55b172b4f4133c79657651666 (diff)
downloadqpdf-6c5e590673331aa685afe8aa997b0b7e64996004.tar.zst
Rename all test files: _ to -
Diffstat (limited to 'qpdf/qtest/c-api-check.test')
-rw-r--r--qpdf/qtest/c-api-check.test30
1 files changed, 30 insertions, 0 deletions
diff --git a/qpdf/qtest/c-api-check.test b/qpdf/qtest/c-api-check.test
new file mode 100644
index 00000000..916bd12f
--- /dev/null
+++ b/qpdf/qtest/c-api-check.test
@@ -0,0 +1,30 @@
+#!/usr/bin/env perl
+require 5.008;
+use warnings;
+use strict;
+
+unshift(@INC, '.');
+require qpdf_test_helpers;
+
+chdir("qpdf") or die "chdir testdir failed: $!\n";
+
+require TestDriver;
+
+cleanup();
+
+my $td = new TestDriver('c-api-check');
+
+my @c_check_types = qw(warn clear);
+my $n_tests = scalar(@c_check_types);
+
+foreach my $i (@c_check_types)
+{
+ $td->runtest("C check $i",
+ {$td->COMMAND => "qpdf-ctest 23 c-check-$i-in.pdf '' -"},
+ {$td->FILE => "c-check-$i.out",
+ $td->EXIT_STATUS => 0},
+ $td->NORMALIZE_NEWLINES);
+}
+
+cleanup();
+$td->report($n_tests);