Skip Menu |

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Scope-Guard CPAN distribution.

Report information
The Basics
Id: 56543
Status: resolved
Priority: 0/
Queue: Scope-Guard
People
Owner: CHOCOLATE [...] cpan.org
Requestors: haarg [...] haarg.org
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: 0.10
Fixed in: (no value)

History Show all quoted text
  Mon Apr 12 18:53:53 2010 haarg [...] haarg.org - Ticket created
Subject: Documentation incorrect for guard/scope_guard in void context
The documentation says that calling guard or scope_guard in void context creates a guard for the current scope. What actually happens is that the guard sub is called immediately.
  Mon Apr 12 18:56:53 2010 CHOCOLATE [...] cpan.org - Taken
  Mon Apr 12 19:02:04 2010 CHOCOLATE [...] cpan.org - Correspondence added
Unless a) I'm misunderstanding you and b) my tests (scope.t and scope_guard.t) are wrong (quite possible), it's the same thing. The guard is installed as a transient variable in the scope's pad. It gets garbage-collected at the end of the scope (and not before) whether it's bound to a variable or not. I do need to tweak the documentation to emphasize the fact that the guard is anonymous in both cases, but not quite in the way you suggest. I'm more than happy to be wrong, though :-) chocolateboy
  Mon Apr 12 19:02:05 2010 The RT System itself - Status changed from 'new' to 'open'
  Mon Apr 12 19:03:23 2010 CHOCOLATE [...] cpan.org - Correspondence added
s/transient variable/transient value/
  Tue Apr 13 09:28:04 2010 haarg [...] haarg.org - Correspondence added
From: haaarg [...] gmail.com
Attached is a failing test to demonstrate the problem. The return value of guard doesn't get stored anywhere in void context, so it gets garbage collected immediately.
Subject: guard-void.t
use strict; use warnings; use Test::More tests => 2; use Scope::Guard qw(guard); { my $last_line_has_run; my $g = guard { ok $last_line_has_run, 'Last line of scope run before guard sub with guard variable' }; $last_line_has_run = 1; } { my $last_line_has_run; guard { ok $last_line_has_run, 'Last line of scope run before guard sub in void context' }; $last_line_has_run = 1; }
  Sun May 16 04:08:19 2010 CHOCOLATE [...] cpan.org - Correspondence added
Many thanks. This should be fixed in 0.20. chocolateboy
  Sun May 16 04:08:49 2010 CHOCOLATE [...] cpan.org - Status changed from 'open' to 'resolved'