develooper Front page | perl.vmsperl | Postings from December 2001

Re: [PATCH] vms/ -- skip tty tests when not interactive

Thread Previous
Craig A. Berry
December 8, 2001 21:56
Re: [PATCH] vms/ -- skip tty tests when not interactive
Message ID:
At 3:27 AM +0000 12/9/01, Peter Prymmer wrote:
>Craig Berry wrote:
>+$   if f$mode() .nes. "INTERACTIVE" then Define PERL_SKIP_TTY_TEST 1
>Might you want to make that a /USER_MODE logical name?

That would be vulnerable to the assignment being moved earlier in the
procedure, where the logical would go out of scope before running
Perl, and also I forget the details of subprocesses inheriting
user-mode logicals but it might not propagate as far as we would
want.  I suppose we could deassign it but the name seems unlikely to
randomly show up in a non-interactive procedure in a way that would
collide with the intended use in the test suite or cause any other

>I note that even if it did work you might some how want
>the PERL_SKIP_TTY_TEST logical name to show up in perl "-V"
>or in a report of what happened hence the answer
>to my question could very well be "no".

There are only two tests where it will have any effect and they both
use the SKIP mechanism to record the fact that tests are not being
run for a legitimate reason.
Craig A. Berry

"... getting out of a sonnet is much more
 difficult than getting in."
                 Brad Leithauser

Thread Previous Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About