diff options
| author | David Mitchell <davem@iabyn.com> | 2009-08-16 20:02:39 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2009-08-16 20:02:39 +0100 |
| commit | bac1ae50f815c189d267d9fccb2cb35791975bf7 (patch) | |
| tree | 9e8b90125ba5ae2b167bfb7ea17f33058bbade5f | |
| parent | 9cc1a8e3162a220874abefd543952e2e193d1f61 (diff) | |
| download | perl-bac1ae50f815c189d267d9fccb2cb35791975bf7.tar.gz | |
remove final traces of constant deparsing
(ef0c5631d3 missed reverting a bit of 2990415a45)
| -rw-r--r-- | ext/B/t/deparse.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/B/t/deparse.t b/ext/B/t/deparse.t index 921cecaed8..0bbc1e72e1 100644 --- a/ext/B/t/deparse.t +++ b/ext/B/t/deparse.t @@ -516,8 +516,8 @@ if (do { $a++; GLIPP }) { x() } >>>> x() if $a; if ($a == 1) { x(); } elsif ($b == 2) { z(); } -if (do { foo(); GLIPP }) { x(); } -if (do { ++$a; GLIPP }) { x(); } +if (do { foo(); 'glipp' }) { x(); } +if (do { ++$a; 'glipp' }) { x(); } #### # TODO Only strict 'refs' currently supported # 68 strict |