Peter,
I've taken your new configure.com for a spin and it seems to work just fine,
though all I've done is a -des so far. Thanks for posting the sprintf.t
fix; I did notice a failure there and will try this as soon as I get a chance.
If anyone wants to try Chuck Lane's piping mods with perl@6409, you'll need
to patch the patch first. It looks weird, but it does (almost) work. The
vmsish.t part seems to confuse patch, so you might just want to chop it out
of the original patch since it's already in the current source. It might
also be easy enough to just edit the patch to add the argument pTHX to the
first instance of vms_execfree() and aTHX to the other two. Without this,
patch gets confused and fails on a very large and important hunk of Chuck's
code. You'll find the original patch at
<http://www.crinoid.com/perl560/htmlx>.
--- vmspipe010_20000524.patch;-0 Thu Aug 3 19:47:59 2000
+++ vmspipe010_20000524.patch Thu Aug 3 20:01:39 2000
@@ -366,7 +366,7 @@
}
static unsigned long int setup_cmddsc(char *cmd, int check_img);
- static void vms_execfree();
+ static void vms_execfree(pTHX);
+/*
+ we actually differ from vmstrnenv since we use this to
@@ -1124,7 +1124,7 @@
+ return Nullfp;
}
-- vms_execfree();
+- vms_execfree(aTHX);
- if (!handler_set_up) {
- _ckvmssts(sys$dclexh(&pipe_exitblock));
- handler_set_up = TRUE;
@@ -1240,7 +1240,7 @@
+ _ckvmssts(lib$delete_symbol(&d_sym_in, &table));
+ _ckvmssts(lib$delete_symbol(&d_sym_err, &table));
+
-+ vms_execfree();
++ vms_execfree(aTHX);
PL_forkprocess = info->pid;
return info->fp;
@@ -1392,13 +1392,3 @@
+$ perl_on
+$ 'cmd
+$ perl_exit '$STATUS'
---- vms/ext/vmsish.t-orig Wed May 17 07:19:04 2000
-+++ vms/ext/vmsish.t Wed May 17 07:19:04 2000
-@@ -136,6 +136,7 @@
- local *P;
- open(P,'>vmsish_test.com') || die('not ok ?? : unable to open "vmsish_test.com"
for writing');
- print P "\$ set message/facil/sever/ident/text\n";
-+ print P "\$ define/nolog sys\$error nl:\n";
- print P "\$ $Invoke_Perl @_\n";
- close P;
- my $x = `\@vmsish_test.com`;
[end of patch to pipe patch]
_______________________________________________
Craig A. Berry
mailto:[EMAIL PROTECTED]
