zhangyiss/feedgnuplot
1
0
Fork 0
mirror of https://github.com/dkogan/feedgnuplot.git synced 2025-05-05 22:11:12 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

updated reference plots to work specifically with gnuplot 4.6.4

Browse Source
This commit is contained in:
Dima Kogan 2013-10-20 00:39:38 -07:00
parent 46123fc308
commit 0270ec7679
1 changed files with 27 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
t/plots.t
View File

@ -2,8 +2,9 @@
# This tests various features of feedgnuplot. Note that the tests look at actual # This tests various features of feedgnuplot. Note that the tests look at actual
# plot output using the 'dumb' terminal, so any changes in gnuplot itself that # plot output using the 'dumb' terminal, so any changes in gnuplot itself that
# change the way the output looks will show up as test failures. Hopefully this # change the way the output looks will show up as test failures. Currently the
# will not be a big deal # reference plots come from gnuplot 4.6.4, and I make sure this is the version
# we're testing with
# require a threaded perl for my tests. This block lifted verbatim from the cpantesters wiki # require a threaded perl for my tests. This block lifted verbatim from the cpantesters wiki
@ -14,9 +15,18 @@ BEGIN {
exit(0); exit(0);
} }
unless( open( my $pipe, '|-', 'gnuplot' )) open(my $pipe, 'gnuplot --version |');
if( !$pipe )
{ {
print("1..0 # Skip: gnuplot not installed. This is required for feedgnuplot to be useful\n"); print("1..0 # Skip: gnuplot not installed. Tests require ver. 4.6.4; feedgnuplot works with any.\n");
exit(0);
}
my $gnuplotVersion = <$pipe>;
chomp $gnuplotVersion;
if ($gnuplotVersion ne "gnuplot 4.6 patchlevel 4")
{
print("1..0 # Skip: tests require gnuplot 4.6.4. Instead I detected '$gnuplotVersion'.\n");
exit(0); exit(0);
} }
} }
@ -318,8 +328,8 @@ tryplot( testname => 'lines on both axes with labels, legends, titles',
Test plot Test plot
y2 y2
10 ++---------+----------+---------+----------+----------+----------+---------+---------*A 30 10 ++---------+----------+---------+----------+----------+----------+---------+---------*A 30
+ + + + + + + + ** + + + + + + + + data 0 **A*** +
| data 0 **A*** | | *** |
| *** | | *** |
9 ++ ** | 9 ++ ** |
| *** #B 25 | *** #B 25
@ -368,8 +378,8 @@ tryplot( testname => 'lines on both axes with labels, legends, titles; different
Test plot Test plot
y2 y2
10 ++---------+----------+---------+----------+----------+----------+---------+---------** 30 10 ++---------+----------+---------+----------+----------+----------+---------+---------** 30
+ + + + + + + + ** + + + + + + + + data 0 ****** +
| data 0 ****** | | *** |
| *** | | *** |
9 ++ ** | 9 ++ ** |
| *** +G 25 | *** +G 25
@ -460,12 +470,12 @@ tryplot( testname => 'dataid plot',
25 ++---------+-----------+----------+-----------+----------+----------+-----------+---------+E 25 ++---------+-----------+----------+-----------+----------+----------+-----------+---------+E
+ + + + + + + + + + + + + + + + + 2 **A*** +
| 2 **A*** |
| 4 ##B### | | 4 ##B### |
| 6 $$C$$$ | | 6 $$C$$$ |
| 8 %%D%%% | | 8 %%D%%% |
| 10 @@E@@@ | | 10 @@E@@@ |
| |
20 ++ ++ 20 ++ ++
| | | |
| | | |
@ -695,7 +705,7 @@ tryplot( testname => 'Circles',
refplot => <<'EOF' ); refplot => <<'EOF' );
5 ++-------+--------+--------+--------+--------+--------+--------+--------*--------+-------** 5 ++-------+--------+--------+--------+--------+--------+--------+--------*******************
+ + + + + + + + * + *+ + + + + + + + + * + *+
| * * *| | * * *|
| ******** * *| | ******** * *|
@ -742,14 +752,14 @@ tryplot( testname => 'Error bars (using extraValuesPerPoint)',
refplot => <<'EOF' ); refplot => <<'EOF' );
5.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------*** 5.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------**
+ + + + + + + + * + + + + + + + + *
| * | *
5 ++ +A 5 ++ +A
| * | *
| * | *
| * | *
4.5 ++ *** 4.5 ++ **
| *** | | *** |
| * | | * |
4 ++ A ++ 4 ++ A ++
@ -773,8 +783,8 @@ tryplot( testname => 'Error bars (using extraValuesPerPoint)',
1.5 ++ ++ 1.5 ++ ++
| | | |
| | | |
1*A* ++ 1 A* ++
*** | ** |
| | | |
+ + + + + + + + + + + + + + + + + +
0.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------++ 0.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------++
@ -1775,7 +1785,7 @@ tryplot( testname => '--timefmt streaming plot with --monotonic',
| *** | | *** |
+ ** + + + + + + ** + + + + +
-4 A*----------------+------------------+-----------------+------------------+----------------++ -4 A*----------------+------------------+-----------------+------------------+----------------++
05:06 05:06 05:06 05:06 05:06 05:07 05:06 05:06 05:06 05:06 05:06 05:06
@ -1975,7 +1985,7 @@ tryplot( testname => '--timefmt streaming plot with --monotonic',
| *** | | *** |
+ ** + + + + + + ** + + + + +
-4 A*----------------+------------------+-----------------+------------------+----------------++ -4 A*----------------+------------------+-----------------+------------------+----------------++
05:06 05:06 05:06 05:06 05:06 05:07 05:06 05:06 05:06 05:06 05:06 05:06