projects
/
gitmo/Eval-Closure.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
is setting up hints as in the caller a sane thing to do?
[gitmo/Eval-Closure.git]
/
t
/
debugger.t
1
#!/usr/bin/env perl
2
use strict;
3
use warnings;
4
use Test::More;
5
use Test::Fatal;
6
7
BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
8
9
use Eval::Closure;
10
11
unlike(
12
exception {
13
eval_closure(
14
source => 'sub { $bar }',
15
description => 'foo',
16
)
17
},
18
qr/#line/,
19
"#line directive isn't added when debugger is active"
20
);
21
22
23
done_testing;