3 files changed, 56 insertions, 0 deletions
diff --git a/libtests/build.mk b/libtests/build.mk
index 682c2b6d..40bd0829 100644
--- a/libtests/build.mk
+++ b/libtests/build.mk
@@ -21,6 +21,7 @@ BINS_libtests = \
 	md5 \
 	nntree \
 	numrange \
+	pdf_version \
 	pointer_holder \
 	predictors \
 	qintc \
diff --git a/libtests/pdf_version.cc b/libtests/pdf_version.cc
new file mode 100644
index 00000000..2776d43b
--- /dev/null
+++ b/libtests/pdf_version.cc
@@ -0,0 +1,39 @@
+#include <qpdf/PDFVersion.hh>
+
+#include <cassert>
+#include <iostream>
+
+int main()
+{
+    PDFVersion v1;
+    assert(v1.getMajor() == 0);
+    assert(v1.getMinor() == 0);
+    assert(v1.getExtensionLevel() == 0);
+    v1 = PDFVersion(1, 7, 8);
+    assert(v1.getMajor() == 1);
+    assert(v1.getMinor() == 7);
+    assert(v1.getExtensionLevel() == 8);
+    std::string version;
+    int extension_level = -1;
+    v1.getVersion(version, extension_level);
+    assert(version == "1.7");
+    assert(extension_level == 8);
+    PDFVersion v2(1, 5);
+    v2.getVersion(version, extension_level);
+    assert(version == "1.5");
+    assert(extension_level == 0);
+    assert(v2 < v1);
+    PDFVersion v3 = v1;
+    assert(v3 == v1);
+    v1.updateIfGreater(v2);
+    assert(v3 == v1);
+    assert(! (v3 == v2));
+    assert(! (v2 == v1));
+    v2.updateIfGreater(v1);
+    assert(v2 == v1);
+    v2.getVersion(version, extension_level);
+    assert(version == "1.7");
+    assert(extension_level == 8);
+    std::cout << "PDFVersion assertions passed" << std::endl;
+    return 0;
+}
diff --git a/libtests/qtest/version.test b/libtests/qtest/version.test
new file mode 100644
index 00000000..7a8182ee
--- /dev/null
+++ b/libtests/qtest/version.test
@@ -0,0 +1,16 @@
+#!/usr/bin/env perl
+require 5.008;
+use warnings;
+use strict;
+
+require TestDriver;
+
+my $td = new TestDriver('pdf_version');
+
+$td->runtest("pdf_version",
+             {$td->COMMAND => "pdf_version"},
+             {$td->STRING => "PDFVersion assertions passed\n",
+                  $td->EXIT_STATUS => 0},
+             $td->NORMALIZE_NEWLINES);
+
+$td->report(1);