tests report versions of underlying graphics engines

Author: mohawk2

Changes

@@ -1,3 +1,5 @@
+- tests report versions of underlying graphics engines
+
 1.014 2024-10-25
 - exception when oplot in multiplot mode
 - oplot now leaves {x,y}range alone

lib/PDL/Graphics/Simple/Gnuplot.pm

@@ -100,7 +100,7 @@ sub check {
 	$mod->{msg} = $s;
 	die "PDL::Graphics::Simple: $s";
     }
-
+    $mod->{gp_version} = $PDL::Graphics::Gnuplot::gp_version;
     $mod->{ok} = 1;
     return 1;
 }

lib/PDL/Graphics/Simple/PGPLOT.pm

@@ -77,6 +77,8 @@ sub check {
     $mod->{msg} = "Couldn't find the VCPS file-output device -- giving up.\n";
     return 0;
   }
+  $mod->{pgplotpm_version} = $PGPLOT::VERSION;
+  { PGPLOT::pgqinf('VERSION', $mod->{pgplot_version}, my $len); }
   $mod->{ok} = 1;
   return 1;
 }

lib/PDL/Graphics/Simple/PLplot.pm

@@ -85,7 +85,7 @@ sub check {
 	$mod->{msg} = "No PostScript found";
 	return 0;
     }
-
+    $mod->{plplot_version} = PDL::Graphics::PLplot::plgver();
     $mod->{ok} = 1;
     return 1;
 }

lib/PDL/Graphics/Simple/Prima.pm

@@ -97,7 +97,7 @@ sub check {
       lp::DashDot(), lp::DashDotDot(),
     );
     _load_types();
-
+    $mod->{prima_version} = $Prima::VERSION;
     $mod->{ok} =1;
     return 1;
 }