diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-18 14:19:29 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-18 14:19:29 +0000 |
| commit | 886f8b0ca725d71d88b6920df8b79e5be26ca874 (patch) | |
| tree | c93efccfecc01bcc26acde62f4a08822773813c0 /ext | |
| parent | fa17d1125252c7692b77f5cec3a606914a30cb20 (diff) | |
| download | perl-886f8b0ca725d71d88b6920df8b79e5be26ca874.tar.gz | |
Be tidy.
p4raw-id: //depot/perl@15294
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/B/t/xref.t | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/ext/B/t/xref.t b/ext/B/t/xref.t index 8268e3f898..10f868ac8e 100644 --- a/ext/B/t/xref.t +++ b/ext/B/t/xref.t @@ -93,6 +93,10 @@ is( '1001', 'glob FOO used in subroutine foo' ); +END { + 1 while unlink $file; +} + # End of tests. # Now some stuff to feed B::Xref @@ -100,3 +104,4 @@ is( package Testing::Xref; sub foo { print FOO %::xreftable; } sub bar { print FOO foo; } + |