diff options
author | Solomon Peachy <pizza@shaftnet.org> | 2019-05-23 08:37:36 -0400 |
---|---|---|
committer | Solomon Peachy <pizza@shaftnet.org> | 2019-05-23 08:39:57 -0400 |
commit | 73febcfe0725ca1b8d13147e96b9f398691bcbf0 (patch) | |
tree | 1f00317e1a414d0c81145882e096e1b8b0ca5523 /regression-gp.pl | |
parent | 758c9d02c2c7090372c465b20fd9912946609753 (diff) | |
download | selphy_print-73febcfe0725ca1b8d13147e96b9f398691bcbf0.tar.gz selphy_print-73febcfe0725ca1b8d13147e96b9f398691bcbf0.tar.bz2 selphy_print-73febcfe0725ca1b8d13147e96b9f398691bcbf0.zip |
regression: only test 1/1, 1/3, 3/1, 3/3 pages/copies
instead of the while [1..3][1..3] matrix.
Should save a lot of test time.
Diffstat (limited to 'regression-gp.pl')
-rwxr-xr-x | regression-gp.pl | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/regression-gp.pl b/regression-gp.pl index 64888d0..8932526 100755 --- a/regression-gp.pl +++ b/regression-gp.pl @@ -36,9 +36,11 @@ my $retval = 0; my $id = 123; my $user = "tester"; my $title = "image_test"; -my $max_copies = 3; my $input_image = "testjobs/s3s-59.png"; -my $max_pages = 3; + +my @pages_set = (1, 3); +my @copies_set = (1, 3); + my $valgrind = 0; my $work_dir_base = "/tmp/"; @@ -176,7 +178,7 @@ if ($proc_count > 1 && $kid > 0) { next; } - for (my $pages = 1 ; $pages <= $max_pages ; $pages++) { + foreach my $pages (@pages_set) { # generate PDF. @args = ($convert_exec); for (my $i = 0 ; $i < $pages ; $i++) { @@ -211,7 +213,7 @@ if ($proc_count > 1 && $kid > 0) { next; } - for (my $copies = 1 ; $copies <= $max_copies ; $copies++) { + foreach my $copies (@copies_set) { # Call raster2gutenprint @args = ($rastertogutenprint_exec, $id, $user, $title, $copies, $options); if ($valgrind) { |