diff options
| author | Steffen Mueller <smueller@cpan.org> | 2011-02-13 11:22:15 +0100 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2011-07-12 20:54:49 +0200 |
| commit | 4ec289a540433aa3b85e718f0d6877947b7fb045 (patch) | |
| tree | 79d57f3c2d10f48412ce1d7e1349c661bac2d343 /dist | |
| parent | 63972a1e2e4cf2b5b10cc45ba221f733e2737578 (diff) | |
| download | perl-4ec289a540433aa3b85e718f0d6877947b7fb045.tar.gz | |
Add comment explaining where terrible code comes from
... and it is not brought by the stork.
Diffstat (limited to 'dist')
| -rw-r--r-- | dist/ExtUtils-ParseXS/t/600-t-compat.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/dist/ExtUtils-ParseXS/t/600-t-compat.t b/dist/ExtUtils-ParseXS/t/600-t-compat.t index 6cc6678e1e..90d3483a7b 100644 --- a/dist/ExtUtils-ParseXS/t/600-t-compat.t +++ b/dist/ExtUtils-ParseXS/t/600-t-compat.t @@ -93,7 +93,10 @@ foreach my $test (@tests) { } - +# The code below is a reproduction of what the pre-ExtUtils::Typemap +# typemap-parsing/handling code in ExtUtils::ParseXS looked like. For +# bug-compatibility, we want to produce the same data structures as that +# code as much as possible. sub _process_typemaps { my ($tmap, $pwd) = @_; |