Searched refs:in_effect (Results 1 – 11 of 11) sorted by relevance
| /openbsd/src/gnu/usr.bin/perl/cpan/bignum/t/ |
| D | in_effect.t | 4 # Test in_effect()
14 can_ok('bigint', qw/in_effect/);
19 is(bigint::in_effect(), 1, 'bigint in effect');
20 is(bigfloat::in_effect(), undef, 'bigfloat not in effect');
21 is(bigrat::in_effect(), undef, 'bigint not in effect');
27 is(bigint::in_effect(), undef, 'bigint not in effect');
28 is(bigfloat::in_effect(), undef, 'bigfloat not in effect');
29 is(bigrat::in_effect(), undef, 'bigrat not in effect');
36 can_ok('bigfloat', qw/in_effect/);
41 is(bigint::in_effect(), undef, 'bigint not in effect');
[all …]
|
| /openbsd/src/gnu/usr.bin/perl/t/lib/ |
| D | mypragma.t | 19 is(mypragma::in_effect(), undef, "pragma not in effect yet");
21 is(mypragma::in_effect(), undef, "pragma not in effect yet");
22 eval qq{is(mypragma::in_effect(), undef, "pragma not in effect yet"); 1}
27 is(mypragma::in_effect(), 42, "pragma is in effect within this block");
30 eval qq{is(mypragma::in_effect(), 42,
35 is(mypragma::in_effect(), 0, "pragma no longer in effect");
36 eval qq{is(mypragma::in_effect(), 0, "pragma no longer in effect"); 1}
40 is(mypragma::in_effect(), 42, "pragma is in effect within this block");
41 eval qq{is(mypragma::in_effect(), 42,
44 is(mypragma::in_effect(), undef, "pragma no longer in effect");
[all …]
|
| D | Sans_mypragma.pm | 4 mypragma::in_effect();
|
| D | mypragma.pm | 40 sub in_effect { subroutine
|
| /openbsd/src/gnu/usr.bin/perl/pod/ |
| D | perlpragma.pod | 59 if (myint::in_effect(1)) {
83 $^H{"myint/in_effect"} = 1;
87 $^H{"myint/in_effect"} = 0;
90 sub in_effect {
93 return $hinthash->{"myint/in_effect"};
120 is encapsulated into the routine C<in_effect()>, which takes as parameter
123 C<$^H{"myint/in_effect"}> when each line of the user's script was called, and
|
| /openbsd/src/gnu/usr.bin/perl/cpan/bignum/lib/ |
| D | bigrat.pm | 41 sub in_effect { subroutine
|
| D | bigfloat.pm | 51 sub in_effect { subroutine
|
| D | bigint.pm | 41 sub in_effect { subroutine
|
| D | bignum.pm | 60 sub in_effect { subroutine
|
| /openbsd/src/gnu/usr.bin/perl/Porting/ |
| D | deparse-skips.txt | 191 ../cpan/bignum/t/in_effect.t
|
| /openbsd/src/gnu/usr.bin/perl/ |
| D | MANIFEST | 378 cpan/bignum/t/in_effect.t See if in_effect() works
|