diff options
Diffstat (limited to 'libtests/qtest')
-rw-r--r-- | libtests/qtest/closedfile.test | 16 | ||||
-rw-r--r-- | libtests/qtest/closedfile/input | 5 | ||||
-rw-r--r-- | libtests/qtest/closedfile/output | 3 |
3 files changed, 24 insertions, 0 deletions
diff --git a/libtests/qtest/closedfile.test b/libtests/qtest/closedfile.test new file mode 100644 index 00000000..864f9c12 --- /dev/null +++ b/libtests/qtest/closedfile.test @@ -0,0 +1,16 @@ +#!/usr/bin/env perl +require 5.008; +use warnings; +use strict; + +chdir("closedfile") or die "chdir testdir failed: $!\n"; + +require TestDriver; + +my $td = new TestDriver('closed_file_input_source'); + +$td->runtest("closed file input source", + {$td->COMMAND => "closed_file_input_source"}, + {$td->FILE => "output", $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); +$td->report(1); diff --git a/libtests/qtest/closedfile/input b/libtests/qtest/closedfile/input new file mode 100644 index 00000000..25dbd5c2 --- /dev/null +++ b/libtests/qtest/closedfile/input @@ -0,0 +1,5 @@ +!00000000? +Offset 11 +wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww +9 before +This is 25 from the end. diff --git a/libtests/qtest/closedfile/output b/libtests/qtest/closedfile/output new file mode 100644 index 00000000..7a5554af --- /dev/null +++ b/libtests/qtest/closedfile/output @@ -0,0 +1,3 @@ +testing with ClosedFileInputSource +testing with FileInputSource +all assertions passed |