diff options
| author | Gerard Goossen <gerard@ggoossen.net> | 2009-11-16 13:58:24 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-11-21 19:26:51 +0100 |
| commit | 021f53de09926928546378b3552f9240c9241dde (patch) | |
| tree | a3ba92293e96921c4787a19f8b95b0f75af94303 /t/comp | |
| parent | 5255f1f44de85b78264e59ed3da05d4a6d3f3671 (diff) | |
| download | perl-021f53de09926928546378b3552f9240c9241dde.tar.gz | |
Force OP_REQUIRE to scalar context at the end of ck_require and don't let it become void context. Fixes problem with require not always being in scalar context.
Diffstat (limited to 't/comp')
| -rw-r--r-- | t/comp/require.t | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/t/comp/require.t b/t/comp/require.t index a8684575b1..baf48870a3 100644 --- a/t/comp/require.t +++ b/t/comp/require.t @@ -166,9 +166,8 @@ print $x; # Test that scalar context is forced for require write_file('bleah.pm', <<'**BLEAH**' -my $TODO = $i == 38 ? " # TODO " : ""; print "not " if !defined wantarray || wantarray ne ''; -print "ok $i - require() context $TODO\n"; +print "ok $i - require() context\n"; 1; **BLEAH** ); |